outline for Detailed System Documentation of NLS 

1 System Maintence Guide for NLS (maintence,) 

la Files and their contents 

lb Steps in assembly 

lc Steps in assembly of other features 

2 Description of Special problems with NLS (special,) 

2a Overlay structure and relabeling 

2al overlay structure 

2a2 conventions 

2a3 Implementation 
2b Output overlay (KOL, META, etc.) 
2c Formated output (passit) 
2d Keeping the binary code for NLS sub-systems: the C*NLS file 

2dl The code problem 

2d2 storage on the file and conventions 

2d3 The NLSDMP program 
2e Input from Keyboard 
2f Input from QED files (passl) 
2g Display creation 
2h SDB gjj&bage collection 
2i Errors and Aborts 
23 Sequence generation 
2k File link Jumps 

3 Other features (features,) 

3a File clean up 

3b Content analyzer compiler 

3c Vectors 



outline for Detailed System Documentation of NLS 
3d Special characters 
3e Display of structure as tree 
h NLS Random file structure and handling (nlsfiles,) 
lia General description 
lib File Block structure 

libl RSV blocks 

lib2 SDB blocks 

lib3 VED blocks 

kbk File header block 

!ib5 Others 
Ii.c Handling 

Jtcl Core tables, 10 

lic2 File copy 

5 Description of data areas (dataforms,) 

5a Data forms and terms 

5b Data arrays of importance 

5bl ADATA 

5b2 DISBUF 

6 Documentation of code by overlay 

6a UTILTY overlay procedures (utilty,) 
6b INPFBK overlay procedures (inpfbk,) 
6c SDBMNP overlay procedures (sdbmnp,) 
6d RECINT overlay procedures (reclnt,) 
6e IOCTL overlay (FIOCTL, FIOLIB) (ioctl,) 
6f FMTOUT overlay procedures (sdbmnp,) 
6g CDSPLY overlay procedures 



Outline for Detailed System Documentation of NLS 
6h PRMSPG overlay (PRMSPC, SPCLIB) 
6i STRMNP overlay (STRMNP, MNPLIB) 
6j TXTEDT overlay {TXTEDT, TXTLIB) 
6K MNCTRL overlay 



:SYSGD, 10/21/69 2159:34 WHP : (paxasis,l:xh) (indexsgebt) 

1 program structure (drawing deleted for printout) 

2 for documentation on file structure see (filestructure,l) 

3 for documentation on special problems see (nlsdocumentation,!) 
k for documentation on data forms see (dataforms,l) 

5 (file structure) file structure 

5a for Nts file structure, see (andrews, nlsflles, 1 :xnb) 
5b definition of terms, see (andrews, dataforras,l sxny) 

6 (ovllnd) overlay index & debug information 

6a (auxcod) forks and fork starting 

6al link to file (nls, AUXCOD, :gwJ) (kdf ERICKSON) 

6a2 starting locations orgaux*21t000 page 5 

6a3 cells used: 26234 

6al* location for temporaries: axt 

6a5 prefix for generated labels: axl 

6a6 orocedures in the AUXCOD overlay 

6a6a (qkf) freeze statement 
(AUXCOD, qkf :gwJ) 

6a6b (qka) release frozen statement 

(AUXCOD, QKA SgwJ) 

6a6c (qplsl) pointer show 
(AUXCOD, qplsl :gwj) 

6a6d (qpml) pointer delete 
(AUXCOD, qpml rgwJ) 

6a6e (delptn) delete pointers 
(AUXCOD, delptn :gwJ) 

6a6f (seeptr) show pointers 
(AUXCOD, seeptr sgwJ) 

6a6g (frzst) freeze statement 
(auxcod, frzst :gwj) 



6a6h 
6a6i 
6a6j 
6a6k 
6a61 
6a6m 
6a6n 
6a6o 
6a6p 
6a6q 
6a6r 
6a6s 
6a6t 
6a6u 
6a6v 
6a6w 
6a6x 
6b (reclnt) 



relall) release frozen statements 
AUXCOD, relall :gwJ) 

sttus) status 
AUXCOD, sttus :gwJ) 



for status 



used) number blocks used message 
AUXCOD, used *gwJ) 

bl) byte 1 of a-reg 
AUXCOD, bl :gwJ) 

b2) byte 2 of a-reg 
AUXCOD, b2 ;gwJ) 

b3> byte 3 of a-reg 
AUXCOD, b3 :gwJ) 

typdat) type data 
AUXCOD, typdat :gwJ) 

inptfs) input fork - insert character intoinput buffer 
AUXCOD, inptfs :gwJ) 

inptl) input a character 
AUXCOD, inptl :gwj) 

inptf) input fork 
AUXCOD, inptf sgwj) 

opnffk) open file fork 
AUXCOD, opnffk :gwJ) 

tadfk) time and data fork 
AUXCOD, tadfk :gwj) 

wtfork) alarm wait fork 
AUXCOD, wtfork sgwJ) 

chkrub :gwJ) check for rubout during insert OED 
AUXCOD, chkrub :gwJ) 

xerror) errors and aborts 
AUXCOD, xerror :gwJ) 

resetl) reset 
AUXCOD, resetl :gwJ) 

resnes> reset 
AUXCOD, resnes :gwJ) 

recovery and initializing 



6bl link to file (nls,recint, :gwj) (kdf MOD 

6b2 starting locations orgrinalOOOO page 2 

6b3 cells used* 13573 

6&U location for temporaries! rit 

6b5 prefix for generated labels? ril 

6b6 procedures in the PECINT overlay 

6b6a (getpag) get a new page from system 
(RECINT, getpag :gwJ) 

6b6b (setint) initialize NLS 
(RECINT, setint sgwJ) 

6b6c (makro) make page read only 
(RECINT, makro :gwj) 

6b6d (setnls) more initialization for NLS 
(RECINT, setnls sgwJ) 

6b6e (settod) todas initialization 
(RECINT, settod :gwJ) 

6b6f (getans) reads yes or no from Keyboard 
(RECINT, getans ;gwj) 

6b6g (gtembk) restore pages that were dropped from PMT 
(RECINT, gfembk sgwJ) 

6b6h (rlssom) release some pages from PMT 
(RECINT, rlssom :gwJ) 

6b6i (rstart) restart for continue NLS 
(RECINT, rstart sgwJ) 

6b6j (setfil) set up random file 
(RECINT, setfil :gwJ) 

6b6k (setws) set up work station 
(RECINT, setws SgwJ) 

6b6l (setdis) set up display 
(RECINT, setdis sgwJ) 

6b6ra (settos) set todas view specs 
(RECINT, settos :gwJ) 

6b6n (setdb) initialize dispaly buffer 
(RECINT, setdb sgwJ) 



6b6o (setdpg) initialize data page 
(RECINT, setdpg :gwJ) 

6b6p (savpop) save pop transfer vector 
(RECINT, savpop :gwJ) 

6b6q (setrsv) zero RSVST 
(RECINT, setrsv :gwJ) 

6b6r (setsdb) zero SDBST 
(RECINT, setsdb sgwJ) 

6b6s (aunkf) after reading bad file 
(RECINT, junkf :gwj) 

6b6t (ldsbsy) load subsystem with BRS 100 
(RECINT, ldsbsy :gwJ) 

6b6u (lodrl) load relabelling for output 
(RECINT, lodrl sgwJ) 

6b6v (todpro) todas processors 
(RECINT, todpro :gwJ) 

6b6w (setpsli) set up for pass It 
(RECINT, setpsi ;gwJ) 

6b6x (setprc) set up for processors 
(RECINT, setpro jgwJ) 

6b6y (runprc) run processor 
(RECINT, runprc sgwJ) 

6b6z {setmol) set up for mol 
(RECINT, setmol JgwJ) 

6b6a@ (setout) transfer to compiler 
(RECINT, setout :gwJ) 

6b6aa (bsrtn) return from process 
(RECINT, bsrtn :gwj) 

6b6ab (waitbs) wait for left arrow 
(RECINT, waitbs :gwJ) 

6b6ac (setalm) set up alarm closk 
(RECINT, setalm :gwJ) 

6b6ad (timms) times for alarm clock 
(RECINT, timms sgwj) 

6b6ae (setpsl) set up pass 1 
(RECINT, setpsl :gwJ) 



6b6af (ttyck) input from TTY buffer 
(RECINT, ttycK :gvj) 

6h6ag (OERGPS) return from process 

(RECINT, OERGPS :gwJ) 

6b6ah (stotfk) statr output fork 
(RECINT, stotfk :gwJ) 

6b6ai (rlsall) release pages for process 
(RECINT, rlsall :gwJ) 

6b6aj (rlblrf) relabel in randoa file blocks 
(RECINT, rlblrf :gwJ) 

6b6ak (actDro) activate process 
(RECINT, actpro :gwJ) 

6b6al (stfprv) start process fork 
(RECINT, stfprv :gwJ) 

6b6aro (dmllnk) link to (dismes :^wj) for portal 
(RECINT, dmlink :gwj) 

6c (data) aata page 

6cl link to file (nls,data, :xbhjnz) (kdf ERIGKSON) 

6c2 starting: location: orguty«litOOO page 3 

6c3 cells used: 17715 
6d (utilty) utility package 

6dl link to file (NLS, utilty, l:gebjJ) (kdf PARSLEY) 

6d2 starting location: orguty«lltOOO page 3 

6d3 cells used: 17715 

66k location for temporaries: utt 

6dS prefix for generated labels: utl 

6d6 procedures in the UTILTY overlay 

6d6a (utgd) UTILTY general declarations 
(UTILTY, utgd :gwj) 

6d6b (push) push b-reg onto general stack 
(UTILTY, push :gwj) 

6d6c (pop) popgeneral stack onto b-reg 



(UTILTY, pop SgwJ) 

6d6d (rellit) release literal register 
(UTILTY, rellit sgwJ) 

6d6e (getlit) get literal register 
(UTILTY, getlit :gwJ) 

6<36f (regadr) get register address 
(UTILTY, regardr sgwJ) 

6d6g (apchr) append character to a-string 
(UTILTY, apchr sgwJ) 

6d6h (apsr) append a-string to another 
(UTILTY, apsr sgwJ) 

666i. (ldchr) load character from a-string 
(UTILTY, ldchr sgwJ) 

6d<5j (cpysr) copy one a-string into another 
(UTILTY, cpysr sgwJ) 

6d6k (asrbuf) move a-string to buffer 
(UTILTY, asrbuf sgwJ) 

€661 (mvbfbf) move Puffer (up in core) 
(UTILTY, mvhfbf :gwJ) 

6d6m (mvdown) move buffer (down in core) 
(UTILTY, ravdown :gwJ) 

6d6n (dismes) display message 
(UTILTY, dismes :gwj) 

6d6o (outmes) TODAS - output message to TTY 
(UTILTY, outmes SgwJ) 

6d6p (crlf) TODAS - output message to CRLF 
(UTILTY, crlf SgwJ) 

6d6q (err) error recovery - pop 
(UTILTY, err :gwJ) 

6d6r (rerror) serious error 
(UTILTY, rerror sgwJ) 

6d6s (abort) user error - pop 
(UTILTY, abort sgwj) 

6d6t (fechcl) read characters from statement 
(UTILTY, fechcl sgwJ) 



6d6u (getsuc) get successor of PSID 
{UTILTY, getsuc :gwJ) 

6d6v (getsub) get sub of PSID 
(UTILTY, getsub SgwJ) 

6d6w (getftl) get tail flag of PSID 
(UTILTY, getftl :gwJ) 

6d6x (getfhd) get head flag of PSID 
(UTILTY, getfhd :gwJ) 

6d6y (getsdb) get PSDB 

(UTILTY, getsdb :gwJ) 

6d6z (getssf) get word #1 of ring element 
(UTILTY, getssf :gvJ) 

6d6a@ (fchsdb) fetch sdb given PSID 
(UTILTY, fchsdb :gwJ) 

6d6aa (lodrsv) load ring element given PSID 
(UTILTY, lodrsv :srwj) 

6d6ab (storsv) load ring element, set check: sum to zero 
(UTILTY, storsv :gwJ) 

6d6ac (lodsdb) load sdb given PSDB 
(UTILTY, lodsdb :gwj) 

6d6ad (getvdb) get PVDB given PSID 
(UTILTY, getvdb :gwJ) 

6d6ae (stovdb) store PUDB given PSID 
(UTILTY, stovdb :gwJ) 

6d6af (lodvdb) load VDB given PVDB 
(UTILTY, lodvdb :gw«7) 

6d6ag (lodqb) load Keyword block 
(UTILTY, lodqb :gwJ) 

6d6ah (frzrfb) freeze random file block 
(UTILTY, frzrfb :gwJ) 

6d6ai (getwka) get working random file 
(UTILTY, getwka :gwJ) 

6d6aj (brs66x) delete contents of file 
(UTILTY, brs66x :gwJ) 

6d6ak (opnrff :gwJ) open working random file 
(UTILTY, opnrff sgwJ) 



6d6al (newrfb) get new random file block 
(UTILTY, newrfb sgwJ) 

6d6am (lodrfb) load random file block 
(UTILTY, lodrfb sgwJ) 

6d6an (rfberr) random file block error 
(UTILTY, rfberr sgwj) 

6d6ao (cksum) compute check sum 
(UTILTY, cksum sgwJ) 

6tf6ap (ovl) overlay pop 
(UTILTY, ove sgwj) 

6d6aq (las) load arg on stack pop 
(UTILTY, las sgwj) 

6d6ar (sap) store arg pointer pop 
(UTILTY, sap sgwj) 

6d6as (laa) load arg, a only pop 
(UTILTY, laa sgwj) 

6d6at (saa) store arg, a only pop 
(UTILTY, saa :gwJ) 

6d6au (lap) load arg pointer pop 
(UTILTY, lap :gwj) 

6d6av (lsa) load subroutine arg pop 
(UTILTY, lsa SgwJ) 

6d6aw (sov) select overlay pop 
(UTILTY, sov SgwJ) 

6d6ax (sbc) subroutine call pop 
(UTILTY, sbc SgwJ) 

6d6ay (ovc) overlay call - no return pop 
(UTILTY, ovc sgwj) 

6d6az (brv) branch to overlaypop 
(UTILTY, brv SgwJ) 

6d6b§ (lass) load arg string on stack pop 
(UTILTY, lass sgwj) 

6d6ba (evld) overlay 

(UTILTY, ovld SgwJ) 

6d6bb (ovldpa) overlay - change relabelling 
(UTILTY, ovldpa sgwj) 



6d6bc (ovidn) overlay 

(UTILTY, ovidn SgwJ) 

6d6bd (ovlgo) to return to an overlay 
(UTILTY, ovlgo :gwj) 

6d6be (ovladr) generate overlay address 
(UTILTY, ovladr :gwJ) 

6d6bf (ursnls) reset NLS 
(UTILTY, ursnls ;gwJ) 

6d6bg (rubout) todas - handles rubout 
(UTILTY, rubout :gvJ) 

6d6bh (intra) interrupt k 
(UTILTY, intra :gwj) 

6d6bi (intrS) interrupt 5 - terminate NLS 
(UTILTY, intrS :gwJ) 

6d6bj (intr7 :gwj) interrupt 7 - input fork-character 
(UTILTY, intr? :gvJ) 

6d<Sbk (intr8) interrupt 8 - alarm clock fork 
(UTILTY, intr8 :gwj) 

6d6bl intr9) interrupt 9 - pass 1 completion 
(UTILTY, lntr9 sgwj) 

6d6bm (intrlO) interrupt 10 - input fork » rubout 
(UTILTY, intrlO :gwJ) 

6d6bn (hash) return hash for a-strlng 
(UTILTY, hash sgwJ) 

6d6bo (getnam) return name hash given PSID 
(UTILTY, getnai :gwJ) 

6d6bp (lKnamh) look for name hash given in a 
(UTILTY, lknamh :gwJ) 

6d6bq (setpb sgwJ) reset pointer table 
(UTILTY, setpb :gwj) 

6d6br (bt) branch true poo 
(UTILTY, bt :gwJ) 

6d6bs (bf) branch false pop 
(UTILTY, bf :gwJ) 

6d6bt (lai) load a immediate oop 
(UTILTY, lai :gwj) 



6d6bu ibl) load b immediate pop 
(UTILTY, lbi :gwj) 

6d6bv (elr) clear a state machine register pop 
(UTILTY, clr :gwj) 

6d<Sbw (sbr) subrouting return pop 
{UTILTY, sbr :gwj) 

6d6bx (atg) set abort target pop 
tUTILTY, atg sgwj) 

6d6by (txt) create a new display pop 
(UTILTY, txt :*wj) 

6d.6bz (cec) copy entity character pop 
(UTILTY, cec :gwJ) 

6d6c@ (cic) copy input character pop 
(UTILTY, cic SgWJ) 

6d6ca (gc) get character pointed to by ab pop 
(UTILTY, gc sgwJ) 

6d6cb (gps) go to previous state pop 
(UTILTY, gps sgwj) 

6d6cc (kset) set general flag to true pop 
(UTILTY, kset SgwJ) 

6d6cd (mks) mark stack for subroutine call 
(UTILTY, mks sgwj) 

6d6ce (clrdpy) clear display 
(UTILTY, clrdpy :gwJ) 

6d6cf (clrlin) clear line 
(UTILTY, clrlin :gwJ) 

6d6cg (resdpy) reset display 
(UTILTY, resdpy :gwJ) 

6d6ch (clrall) clear entire display 
(UTILTY, clrall :gwJ) 

6d6ci (newabs) fid new absolute position for vectore 
(UTILTY, newabs :gwJ) 

6d6cj (cdsep) find lower left position of statement for Upack 
(UTILTY, cdsep :gwj) 

6d6ck (compr) logical comparisons 
(UTILTY, compr :gwj) 
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6e (inpfbk) input feedback 

6el link to file (nls, inpfbk, :xbjhnz) (kdf ERICKSON) 

6e2 starting location: orguty*20000 page k 

6e3 cells used: 231J-03 

6ek location for temporaries: ift 

6eS prefix for generated labels: ifl 

6e6 procedures in the INPFBK overlay 



6e6a 
6e6b 
6e6c 
6e6d 
6e6e 
6e<5f 
6e6g 
6e6h 
6e<§i 
6e6j 
6e6k 
6e61 
6e6m 



(ifgd) general declarations 
(INPFBK, ifgd :gwj) 

(readbm) read bug mark 
(INPFBK, readhra :gwJ) 

(inptc) single character input 
(INPFBK, inptc :gwJ) 

(inptm) main programs input routine 
(INPFBK, inptm :gwj) 

(lkptr) look up pointer 
(INPFBK, lkptr :gwJ) 



(gettab) todas - number spaces to next tab 
(INPFBK, gettab :gwJ) 



for input feedback 



(inpcuc) todas 
(INPFBK, inpcuc :gwJ) 



input character, upper case 



(inputc) todas - read character 

(INPFBK, inputc :gwj) 

(lookc) todas - look at next character 

(INPFBK, llokc :gwJ) 

(outptc) todas - output character to TTY 

(INPFBK, outptc :gwj) 

{putchr) todas - put a character onto TTY or a-string 

(INPFBK, putchr :gwJ) 



(rdlit) todas - 
(INPFBK, rdlit :gwj) 



(resbu) todas - restore character 
(INPFBK, resbu :gw«J) 



read a literal from keyboard 

to input buffer 






6e6n (tinptc) todas - main character Input routine 
(INPFBK, tinptc :gwJ) 

6e6o (txtlit) todas • read literal into literal buffer 
(INPFBK, txtlit SgWJ) 

6e6p (gt2lit) todas - get second literal buffer 
(INPFBK, gt21it :gwJ) 

6e6q (echo) todas - echo string back to TTY 
(INPFBK, echo igvJ) 

6e6r (echoO) todas • echo character 
(INPFBK, echoO :gwj) 

6e6s (eehoj) todas - echo routine 
(INPFBK, echo3 :gwj) 

6e6t (pushp) push ab on spec stack 
(INPFBK, pushp :gwj) 

6e6u (gmon) turn question mark on 
(INPFBK, gmon !gwJ) 

6e6v (gmoff) turn question mark off 
(INPFBK, gmoff :gwj) 

6e6w (cflarw) position command feedback line arrow 
(INPFBK, cflarw :gwJ) 

6e6x (san) set arrow on 
(INPFBK, san sgwj) 

6e6y (saf) set arrow off 
(INPFBK, saf sgwj) 

6e6z (ulopp) bug marks off 
(INPFBK, ulopp :gwj) 

6e6a@ (sbmfbc) set bug mark feedback character 
(INPFBK, sbmfbc ;gwJ) 

6e6aa (cflatc) put a-string in command feedback line 
(INPFBK, cflatc :gwJ) 

6e6ab (ltlg) viewspecs large 

(INPFBK, ltlg Sgwj) 

6e6ac (Itsm) viewspecs small 
(INPFBK, stsm sgwj) 

6e<5ad (cosno) convert a-string to integer 
(INPFBK, cosno igwj) 
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6e6ae 
6e6af 
6e6ag 
6e6ah 
6e6ai 
6e6aj 
6e6ak 
6e6al 
6e6am 
6e6an 
6e6ao 
6e6ap 
6e6aq 
6e6ar 
6e6as 
6e6at 
6e6au 
6e6av 



(asrnara) a-string to name area 
(INPFBK, asrnam :gwJ) 



(bkachr) back up a 
(INPFBK, bKachr :gwJ) 

(numdpy) number display 
(INPFBK, numdpy :gwJ) 

(xintrg) Interrupt 9 
(INPFBK, xintre :gwJ) 



character 



in 



an a-string 



insert qed termination 



(cptstr) copy t-string to a-string 
(INPFBK, cptstr sgwJ) 

(chkfrz) check frozen pages 
(INPFBK, chkfrz) 

(lee) load entity character pop 
(INPFBK, lee sgwj) 

(les) load entity string pop 
(INPFBK, les sgwj) 

(gset) set group and entity pop 
(Inpfbk, gset :gwj) 

(mlfl) move literal to feedback first position - pop 
(INPFBK, mlfl sgwj) 



(mlf) move literal 

(INPFBK, mlf sgwj) 

(mlfr) move literal 

(INPFBK, mlfr :gwj) 



to feedback, next 
to feedback. 



position 
replace last 



(rep) repeat in ease statement pop 
(INPFBK, rep sgwJ) 

(dfs) define state pop 
(INPFBK, dfs :gwj) 

(eta) copy t-string to a-string pop 
(INPFBK, eta :gwj) 



(creg) append char in c 
(INPFBK, creg sgwj) 



to reg no. in a - anypop 



(breg) append character in b to reg no. in a - anypop 
(INPFBK, breg sgwj) 



(sreg) append sar in b 
(INPFBK, sreg sgwj) 



to reg no. in a - anypop 
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6e6aw (sba) set bug to arrow - anypop 
(INPFBK, sba :gwj) 

6e6ax (stp) set but to plus - anypop 

(INPFBK, Sbp JgwJ) 

6e6ay (ta) display in text area - anypop 
(INPFBK, ta :gwJ) 

6e6az (mrf) move register to feedback line, next 
(INPFBK, mrf jgwJ) 

6e6b@ (mrfr) move register to feedback line, replace 
(INPFBK, mrfr igwj) 

6e6ba (mrkl) mark feedback line, first position 
(INPFBK, mrkl tgwJ) 

6e6bb (irk) mark feedback line, current position 
(INPFBK, mrk sgwj) 

6e6bc (kin) input a character - anypop 
(INPFBK, kin igwj) 

6e6bd (kct) character test anypop 
(INPFBK, kct :gwj) 

6e6be (pbm) process bug mark anypop 
(INPFBK, pbm :gwj) 

6e6bf (cse) begin case statement anypop 
(INPFBK, cse :gwJ) 

6e6bg (spcb) spec bug mark anypop 
(INPFBK, spcb JgwJ) 

6e6bh (spcr) spec a register anypop 
(INPFBK, spcr *gwJ) 

6e6bi (mrs) move register to string anypop 
(INPFBK, mrs :gwj) 

6e6bj (bkc) backspace character inan a-string 
(INPFBK, bkc :gwj) 

6e6bk (dpn) display in name area 
(INPFBK, dpn :gwJ) 

6e6bl (spcn) spec hask of a-string 
(INPFBK, spcn tgwJ) 

6e6bm (cct) char t class test 
(INPFBK, cct :gwj) 



la 



6e6bn (zero) zero the spec stack pointer 
(INPFBK, zero sgwJ) 

6e6bo (zao) general reset 
(INPFBK, zap sgwJ) 

6e6bp (sapsp) general reset 
(INPFBK, sapsp :gw<J) 

6e6bq (feedlt) feed view specs to (aetlt sgwJ) 
(INPFBK, feedlt :ewJ) 

6e6br (tch) test character pop 
(INPFBK, tch igwj) 

6t (mnctrl) main control overlay 

611 link to file (nls, mnctrl, :xbbjhnz) (kdf ERICKSON) 

6f2 starting location; orguty*2aOOO page 5 

6f3 cells used: 27kS0 

6£k procedures in the MNCTRL overlay 

6faa (wait) wait for MNCTRL 
(MNCTRL, wait SgwJ) 

6ffcb (caqm) command accept, question mark 
(MNCTRL, caqra JgwJ) 

6fac (dmanl) display, then go to main 
(MNCTRL, dmain :gwj) 

6fHd setdum) set up dummy statement 
(MNCTRL, setdum tgwJ) 

6£ke (cmdrst) command reset 
(MNCTRL, cmdrst :gwJ) 

6£k£ (mdispec) kludge for "set" 
(MNCTRL, mdispec JgwJ) 

6fiig (main) read a character 
(MNCTRL, main sgwJ) 

6flih (wc) what character 
(MNCTRL, wc :gwJ) 

6g (prmspc) parameter specification overlay 

6gl link to file (nls, prmspc, :xbjhnz) (kdf MOD 
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6g2 starting location: erguty=3Q000 page 6 

6g3 cells used: 33767 

6glt orocedures in the PRMSPC overlay 

6gka (recre) recreate display 
(PRMSPC, recre :gwj) 

6*lib (nuview) recreate display starting at new position 
(PRMSPC, nuview :gwJ) 

6gitc (setvsp) set view specs 
(PRMSPC, setvsp :gwJ) 

6gkd (specbug) spec a bug mark 
(PRMSPC, specbug :gwj) 

6giie (waitp) wait in prwspc 
(PRMSPC, waitp :gwj) 

6glif (molrt) output mo2 
(PRMSPC, molrt :gwJ) 

6whg (buglspec) spec a bug mark 
(PRMSPC, buglspec :gw«J) 

6glih (bug2spec) spec two bug narks 
(PRMSPC, buglspec :gwJ) 

6glil (bug3spec) spec three bug marks 
(PRMSPC, bug3spec ;gwJ) 

6nk3 (bugltspec) spec a bug and read literal 
(PRMSPC, butltspec :gwJ) 

6gkk (bug2tspec) spec two bugs and read literal 
(PRMSPC, bug2tspec :gwj) 

6ebl (atext) read literal 
(PRMSPC, atext :gwj) 

6ekm (integer) read an integer from keyboard 
(PRMSPC, atext :gwj) 

6glm (ltspec) read view specs from keyboard 
(PRMSPC, ltspec :gwJ) 

6g&o (statno) read statement number from keyboard 
(PRMSPC, statno :gwJ) 

6glip (statnam) read statement name from keyboard 
(PRMSPC, statnam :gwj) 
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6el).q (specn) spec name 

(PRMSPC, specn :gwj) 

6ekr (jpspcn igwj) jump spec name 
{PRMSPC, jpspcn :gwJ) 

6glts (jpsplt) jump It 

(PRMSPC, jpsplt :gwJ) 

6glit (kgtwd) get word for keyword 
(PRMSPC, kgtwd :gwj) 

6gku (specit) spec a buz or string 
(PRMSPC, specit :gwJ) 

6gkv (qfs) jump to Item 
(PRMSPC, qfs sgwj) 

6gkw (qjo) jump to origin 
(PRMSPC, qjo :gwj) 

6eiix (qhs) jump to name 
(PRMSPC, qhs jgwj) 

6eliy (qjb) jump back 

(PRMSPC, qjb :gwj) 

6ekz (qjv) jump vector label 
(PRMSPC, qjv :gwj) 

6g!u@ (ajp) jump predecessor 

(PRMSPC, qjp :gwJ) 

6gkaa (qjs) jump successor 
(PRMSPC, qjs jgwJ) 

6gliab (qju) jump up 

(PRMSPC, qju sgwj) 

6git,ac (qjd) jump down 
(PRMSPC, qjd JgwJ) 

6eliad (qjh) jump to head 
(PRMSPC, qjh sgwj) 

figliae (qjt) jumpt o tail 
(PRMSPC, qjt :gwj) 

6eluf (qib) insert branch 
(PRMSPC, qib :gwj) 

6eltag (qis) insert statement 
(PRMSPC, qis sgwj) 



17 



6eliah (qrb) replace branch 
(PRMSPC, qrb sgwJ) 

6gkai (arg) replace group 
(PRMSPC, qrg :gwj) 

6gkaj (qrp) replace plex 
(PRMSPC, qrp !gwj) 

6stliaK (atexti) literal for insert 
(PRMSPC, atexti :gwJ) 

6gkal (atextr) literal for replace 
(PRMSPC, atextr :gwJ) 

6eij.am (adj) adjust level 
(PRMSPC, adj sgwJ) 

6ekan (setlt) set viewspecs 
(PRMSPC, setlt sgwJ) 

6skao (enwdpy) number display for view specs 
(PRMSPC, enwdpy :gwJ) 

6Kkap (aplit) append literal 
(PRMSPC, aplit :gwj) 

6?.ka.Q (aplita) literal input routine 
(PRMSPC, aplita sgwJ) 

6gkar (terlin) terminate line 
(PRMSPC, terlin :gwJ) 

6gkas (nterch) enter character inliteral 
(PRMSPC, nterch :gwJ) 

6gkat (frzsav) save view specs for frozen 
(PRMSPC, frzsav :gwJ) 

6gkau (dpych) display character subroutine file 
(PRMSPC, dpych :gwJ) 

6gkav (jspush) push on jump stack 
(PRMSPC, jspush ;gwJ) 

6«;ltaw (jpsh) push word on jump stack 
(PRMSPC, jpsh sgwJ) 

6gkax (savlt) create word to save view specs 
(PRMSPC, savlt :gwJ) 

6gkay (fechux) 

(PRMSPC, fechux :gwJ) 
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6fkaz (gtllt2) get second literal register 
(PPMSPC, gtlit2 sgwJ) 

6flib® (softld) soft command delete 
(PRMSPC, softld sgwJ) 

6gkba (pbug) process bug mark 
(PP.MSPC, pbug SgwJ) 

6«libb (fndchr) find character given line, column numbers 
(PRMSPC, fndchr sgwJ) 

6h (vctedt) special characters and vector libe 

6hl link to file (nls, vcted, sxbjhnz) (kdf MOD 

6n2 starting location; orguty«21i000 page S 

6h3 cells used: 2610? 

6hk procedures in the VCTEDT overlay 

6hka (jpspco) jump vector label 
(VCTEDT, jpspco sgwJ) 

6hlib (qcd) copy drawing 
(VCTEDT, qcd :gwj) 

6hkc (qcSd) delete drawing 
(VCTEDT, qdd SgwJ) 

6hkd (qmd) move drawing 
(VCTEDT, qmd :gwj) 

6hlie (vwait) wait for VCTEDT 
(VCTEDT, vwait :gwj> 

6hiif (new vdb) get new vector data block 
(VCTEDT, newvdb :gwJ) 

6hkg (nwvdb sgwJ) get new vector data block 
(VCTEDT, nwvdb sgwJ) 

6hh.h (fndlin) find line given bug mark 
(VCTEDT, fndlin sgwJ) 

6hlii (sqrt) square root routine 
(VCTEDT, sqrt JgwJ) 

6hi*.J (dsq) distance squared between two points 
(VCTEDT, dsq sgwJ) 

6hkk (namend) mark end points of line 
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(VCTEDT, namend sgwJ) 

6hkl (endset) set up names for endpoints of line 
(VCTEDT, endset :gwJ) 

6hkm (endput) record which end of line selected 
(VCTEDT, endput sgwJ) 

6hkn (switch) change selection to other end of line 
(VCTEDT, switch :gwJ) 

<Shko (labasr) move label to a-string 
(VCTEDT, labasr :gwJ) 

6hlip (butchr) read character from buffer 
(VCTEDT, butchr :gwJ) 

6hliq (fnd lab) find label given bug mark 
(VCTEDT, fndlab sgwJ) 

<5hkr (distsq) distance squared to label 
(VCTEDT, distsq :gwJ) 

6hks (buglab) attach old label to bug 
(VCTEDT, buglab :gwJ) 

6hkt (spclab) spec label number 
(VCTEDT, spclab :gwJ) 

6hku (to bug) set up bug for label 
(VCTEDT, tobug :gwj) 

6hkv (labres) restore moved label 
(VCTEDT, labres igwJ) 

6hkw (movlab) move label 
(VCTEDT, movlab :gwJ) 

6hkx (dellab) deete label 
(VCTEDT, dellab ;gwJ) 

6hky (newlab) new label to bug 
(VCTEDT, newlab :gwJ) 

6hkz (putlab) fix new label 
(VCTEDT, putlab :gwJ) 

6hka® (mchecK) used by copy and move drawing 
(VCTEDT, mcheck :gwJ) 

6hltaa (mcd) copy drawing 
(VCTEDT, mcd SgwJ) 
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6hlub (mmd) move drawing 
(VCTEDT, mmd sgwj) 

6hkac (mdd) delete drawing 
(VCTEDT, indd :gwj) 

6hliad (mrkpos :gwj) mark position of selection 
(VCTEDT, mrkpos :gwJ) 

6hHae (mrkoff) turn mark off 
(VCTEDT, mrkoff :gwJ) 

6hluf (flwdx) convert X-position to full word 
(VCTEDT, flwdx :gwj) 

6hltag {flwdy) convert Y-position to full word 
(VCTEDT, flwdy :gwj) 

6h^ah (vreset) reset for vector package 
(VCTEDT, vreset :gwJ) 

6hiiai (grdfix) force bug mark onto grid 
(VCTEDT, grdfix igwJ) 

61 (vctrl) vector package 

6il link to file (nls, vctrl, jxbjhnz) (kdf HOD 

612 starting location* orguty»30QOO page 6 

6i3 cells used: 33167 

6lk procedures in the VCTRL overlay 

6ika (vmain) main control for vectors 
(VCTRL, vmain sgwJ) 

6iiib (bdot) turn bug into a dot 
(VCTRL, bdot :gwj) 

6iac (offon) switch ofr spacing 
(VCTRL, offon JgwJ) 

61kd (onoff) switch for spacing 
(VCTRL, onoff sgwJ) 

6iae (lab) read a label 
(VCTRL, lab :gwJ) 

6iiif (endput) select an endpoint 
(VCTRL, endput :gwJ) 

6ilig (vbugl) get a bug select for vector 
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(VCTRL, VbUgl SgwJ) 

6ikh (vbug2) get 2 bugs select for vector 
(VCTRL, vbug2 :gwJ) 

61U (vfeugl) get a bug select for label 
(VCTRL, vbugl :gwJ) 

6ilij (vcwait) wait for vpact 
(VCTRL, vcwait JgwJ) 

6iltk (labget) select a label 
(VCTRL, labget sgwJ) 

6iiU (vcted) initialization for vpack 
(VCTRL, vcted JgwJ) 

6iinn (vctfin) termination for vpack 
(VCTRL, vctfin :gwj) 

6ikn (chkold) check old VDB 
(VCTRL, chkold :gwj) 

6iiio (vabort) abort from vpack 
(VCTRL, vabort sgwJ) 

6±kp (delet) delete a vector 
(VCTRL, delet sgwJ) 

6iUq (trans) translate a vector 
(VCTRL, trans sgwJ) 

6ikr (vertln) make vector vertical 
(VCTRL, vertln sgwJ) 

6iJis (horzln) make vector horizontal 
(VCTRL, horzln sgwJ) 

6iitt (newlin) create new line from endpoints 
(VCTRL, newlin sgwJ) 

6i)tu {putlin) put new line in drawing 
(VCTRL, putlin JgwJ) 

6ikv (putlin) put first new line of sequence 
(VCTRL, putlin sgwJ) 

6ikw (putl2n) put later lines in sequence 
(VCTRL, putl2n JgwJ) 

61kx (movend) move endpoint of line 
(VCTRL, movend sgwJ) 
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61Jiy :gwj) movdrw) move drawing 
(VCTRL, movdrw :gwj) 

6ikz (delpic) delete picture 
(VCTRL, delpic sgwj) 

6ika9 (grdset) turn grid on?off 
(VCTRL, grdset :gwj) 

6iiiaa (grdsiz) change size of grid 
(VCTRL, grdsiz) 

6iJtaP (grdmak) make a grid 
(VCTRL, grdmak :gwj) 

6iliac (spcnum) specify a number 
(VCTRL, spcnum :gw«J) 

6j (diddl) "diddle" (vieweontrol) 

6J1 link to file (NLS, diddl, :xbjhnz) (Kdf ERICKSON) 

6j2 starting location: orguty*2kQQ0 page 5 

6j3 cells used: 270US 

6jk procedures in the DIDDL overlay 

6 .111. a (diiddx) main control for view change 
(DIDDL, diiddx :gwJ) 

6,jkb (pwait) wait in DIDDL 
(DIDDL, pwait :gwJ) 

6,jkc (on-off) switch in DIDDL 
(DIDDL, on-off :gwj) 

6,jlid (intg) read integer in DIDDL 
(DIDDL, intg :gwJ) 

6 .Ike (prraset) parameter set in DIDDL 
(DIDDL, prmset ;gwJ) 

6jkf (char) read a character in DIDDL 
(DIDDL, char :gwj) 

6jlig (numasr) convert number to a-string 
(DIDDL, numasr :gwj) 

6$kh (tabset) initialize to set tabs 
(DIDDL, tabset :gwj) 

6.jki (tabput) put waqy tab value 
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(DIDDL, tabput :gwj) 

6.jlij (acget) get current parameter word for armed cursor 
{DIDDL, acget sewJ) 

6jkK (acput) store parameter word for armed cursor 
(DIDDL, acput ;gwJ) 

6.1kl (csave) save character 
(DIDDL, csave :gwJ) 

6.Um (nmdlt) set first name delimiter 
(DIDDL, nmdlt igwJ) 

6$kn (nmdl2) set second name delimiter 
(DIDDL, nmdl2 sgwJ) 

6j)io (mrkget) get bug mark parameters 
(DIDDL, mrkget :gwj) 

6jkp (mrlcput) put bug mark parameters 
(DIDDL, mrkput :gwj) 

6.jkq (mrcput) set bug mark character 
(DIDDL, mrcput :gwJ) 

6,jkr (cflget) get cfl parameters 
(DIDDL, cflget :gwj) 

6jlis (cflput) put cfl parameters 
(DIDDL, cflput :gwj) 

6jlit (cflaot) put cfl arrow parameters 
(DIDDL, cflapt :gwj) 

6,1ltu (dtput) put date and time parameters 
(DIDDL, dtput sgwJ) 

6,jiiv (ecoput) put echo reg parameters 
(DIDDL, ecoput :gwJ) 

6jliw (namput) put name reg parameters 
(DIDDL, namput :gwJ) 

6,jkx (tstput) put test area parameters 
(DIDDL, tstput :gwj) 

6,Uy (vsaput) put view spec area parameters 
(DIDDL, vsaput sgwJ) 

6jkz (colput) put number of columns 
(DIDDL, colput :gw«T) 
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6jka§ (shocol) show number of columns 
(DIDDL, shocol :gwj) 

6,1kaa (indput) put indenting 
(DIDDL, indput :gwj) 

6jkab (shoind) show indenting 
(DIDDL, shoind :gwj) 

6jkac (vrtput) put vertical increment 
(DIDDL, vrtput :gwJ) 

6jkad (vrtptl) update vertical increment in display 
(DIDDL, vrtptl :gwj) 

6 s jkae (shovrt) show vertical increment 
(DIDDL, shovrt :gwj) 

63kaf (linput) put number of linew 
(DIDDL, linput sgwj) 

6jkag (sholin) show number of lines 
(DIDDL, sholin :gw«H 

6,jkah (mrkpos :gwJ) mark position of bug selection 
(DIDDL, mrkpos :gwj) 

6.jkai (mhps) mark typed position 
(DIDDL, mhps igwj) 

6jkaj (isave) save parameters 
(DIDDL, isave sgwJ) 

63kak (ivestr) restore parameters 
(DIDDL, ivestr :gwj) 

63kal (etrstr) entry for setlt 
(DIDDL, etrstr Jgwj) 

6jkam (mobck) move buffer 
(DIDDL, mobck ;gwJ) 

6Jkan (setsize) set size of characters 
(DIDDL, setsiz) 

6jkao (sethic) set horizontal increment 
(DIDDL, sethic :gwj) 

63kap (setbld) set bold face 
(DIDDL, setbld tgwj) 

6jkaq (setflc) set flicker 
(DIDDL, setflc SgwJ) 
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6 t 1kar (setitl) set italics 
(DIDDL, setitl :gwj) 

6.1kas (setdsp) set display on?off 
(DIDDt, setdsp :gwj> 

6k (keywd) Keyword overlay 

6kl link to file (NLS, keywd, :xbjhnz) (kdf ??) 

6k2 starting location: orgutys2^QOO page 5 

6k3 cells used: 25335 

6Kk procedures in the KEYWD overlay 

6klia (kmain) main control for keyword 
(KEYWD, kmain sgwJ) 

6k!tb (kwait) wait - in KEYWD 
(KEYWD, kwait :gwJ) 

6kkc (kyex) keyword execute 
(KEYWD, kyex jgwj) 



6kltd (kyfndh) find place 
(keywd, kyfndh :gwj) 



in table for keyword select 



6kke 
6kk£ 
6kiig 
6kUh 
6kUi 
6kUj 
6kkK 
6kU 
61 (inksubj 



(kyputw) put weight for keyword 
(KEYWD, Kyputw Jgwj) 

(kyfgt) forget a keyword 
(KEYWD, kyfgt JgwJ) 

(kyfgth) forget a keyword 
(KEYWD, kyfgth :gwj) 

(kyfgta) forget all keywords 
(KEYWD, kyfgta :gw«J) 

(kylist) keyword list 
(KEYWD, kylist :gwJ) 

(kychr) buffer control for KEYWD 
(KEYWD, kychr rgwj) 

(kyxtrn) XTRNAM for keyword 
(KEYWD, kyxtrn :gwj) 

(numasr) number to a-string 
(KEYWD, numasr :gwj) 

links and substitute 
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611 llnK to file (NLS, lnksub, jxbjhnz) (kdf ERICKSON) 

612 starting location: ©rguty»20000 page k 

613 cells used! 21125 

611* nrocedures in the LNKSUB overlay 

61ka (hlnkdm) linlc delimiter 
(LNKSUB, hlnkdm :gwJ) 

61kb (jlpon) jump link possible statement name 
(LNKSUB, jlpon :gvj) 

61kc jlpfn) jump link possible file name 
(LNKSUB, jlpfn :gwJ) 

61kd (jlpun) jump link possible user name 
(LNKSUB, jlpun :gwj) 

61ke (subst sgwJ) substitute 
(LNKSUB, subst :gwJ) 

61kf (subfch) get character for substitute 
(LNKSUB, subfch :gwJ) 

61kg (getch) get character for substitute 
(LNKSUB, getch Jgwj) 

61kh (subsx) initialize substitution 
(LNKSUB, subsx :gwJ) 

61ki (subint) initialize substitution 
(LNKSUB, subint :gwJ) 

6m (strmnp) structure manipulation overlay 

6ml link to file (nls, strmnp, :xbjhnz) (kdf MOD 

6m2 starting location: orguty«20000 page k 

6m3 cells used: 23210 

6mk procedures in the STRMNP overlay 

6mka (qds) delete statement 
(STRMNP, qds :gwj) 

6wkb (qdb) delete branch 
(STRMNP, qdb JgwJ) 

6mkc (qdg) delete group 
(STRMNP, qdg :gwj) 
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6rakd (qdp) delete plex 
(STRMNP, qdp :gwJ) 

6rake (qcs) copy statement 
(STRMNP, qcs Sfwj) 

6mk£ (qcb) copy branch 
(STRMNP, qcb sgwj) 

6mkg (qcg) copy group 

(STRMNP, qcq :gwj) 

6mkh (qcp) copy plex 

(STRMNP, qcp :gwj) 

6mki (qms) move statement 
(STRMNP, qms :gwj) 

6mkj (qmb) move branch 
(STRMNP, qmb sgwJ) 

6mkk (qrap) move plex 

(STRMNP, qmp :gwj) 

6mhl (qmg) move group 

(STRMNP, qmg sgwj) 

6rakm (rpllit) replace with literal 
(STRMNP, rpllit :gwJ) 

6mkn (qrs) replace statement 
(STRMNP, qrs :gvJ) 

6mko (insllt) Insert literal 
(STRMNP, inslit :gwJ) 

6snkp (qbs) break statement 
(STRMNP, qbs :gwj) 

6mkq (abj) join statement 
(STRMNP, qbj :gwj) 

6mkr (qkr) release frozen 
(STRMNP, qkr :gwj) 

6mks (qxb) substitute branch 
(STRMNP, qxb :gwJ) 

6mkt (qxs) substitute statement 
(STRMNP, qxs :gwj) 

6mku (qxp) substitute plex 
(STRMNP, qxp :gwj) 
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6m!iv (qxg) substitute group 
(STRMNP, qxg :gwJ) 

6mkw (grptst) group test 
(STRMNP, grptst sgwJ) 

6ralix (remgrp) remove group 
(STRMNP, remgrp sgwJ) 

6fflky (setgrp) setgroup 

(STRMNP, setgrp sgwJ) 

6mkz (plxset) set plex 

(STRMNP, plxset SgwJ) 

6mlta@ (insgrp) insert group 
(STRMNP, insgrp sgwJ) 

6mltaa (inss) insert statement as successor 
(STRMNP, inss sgwJ) 

6mlub (insd) insert statement down 
(STRMNP, insd sgwJ) 

6rakac (delgrp) delete group 
(STRMNP, delgrp :gwJ) 

6mkad (movtst) structure move test 
(STRMNP, movtst sgwJ) 

6mUae (subgrp) substitute in group 
(STRMNP, subgrp JgwJJ 

6mkzf (copgrp) copy group 
(STRMNP, copgrp :gwJ) 

6miiag (tailx) find tail of plex 
(STRMNP, tailx SgwJ) 

6mkah (sourcx) find source of plex 
(STRMNP, sourcx sgwJ) 

6mkai (headx) find head of plex 
(STRMNP, headx :gwj) 

6mUaj (pred) find predecessor of ring element 
(STRMNP, pred sgwJ) 

fimltak (subtst) test for substructure 
(STRMNP, subtst sgwJ) 

6mJtal (sstftl) set tail flag 
(STRMNP, sstftl sgwJ) 
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<$mli,an 
6mlj,ao 
6fflliap 
6mkaq 
6mliar 
6mkas 
6mkat 
6raluu 
6mkav 
6rakaw 
6wkax 
6mkay 
6mkaz 
6rakb§ 
6mkba 
6ikbb 
6nkbc 



(sstfhd) set head flag 
(STRMNP, sstfhd :gwJ) 

(resftl) reset fail flag 
(STRMNP, resftl :gwJ) 

(resfhd) reset tail flag 
(STRMNP, resfhd :gwJ) 

(setsuc) set successor 

(STRMNP, setsuc :gwJ) 

(set sub) set sub 
(STRMNP, setsub :gwJ) 

(pusha) push a-reg on general stack 
(STRMNP, pusha :gwJ) 

(ate) compare pop 
(STRMNP, ate :gwj) 



(stosuc 
(STRMNP, 

(stosub 
(STRMNP, 

(stofhd 

(STRMNP, 

(stoftl 

(STRMNP, 

(stossf 
(STRMNP, 

(intrsr 
(STRMNP, 

(newrsr 

(STRMNP, 

(nwrsub 

(STRMNP, 

(frersr 

(STRMNP, 

(frevdb 



store successor 
stosuc :gwJ) 

store sub 
stosub :gwJ) 

store head flag 
stofhd sgwJ) 

store tail flag 
stoftl :gwJ) 

store word 1 of ring element 
stossf :gwJ) 

create initial ring element 
intrsr :gwJ) 

new ring element 
newrsr sgwJ) 

new ring element 
nwrsub :gwJ) 

put ring element on free list 
frersr :gwJ) 

free vector data block 



(STRMNP, frevdp :gwJ) 

(relst) release statement 
(STRMNP, relsf :gwj) 



form 



frozen 



list 
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6n (clnup) file clean up 

6nl link to file (nls, clnup, sxbjhnz) (kdf ERICKSGN) 

6n2 starting location: orgutys2iiOOO page 5 

6n3 cells used! 27725 

6nit procedures in the CLNUP overlay 

6niia (clraain) entry for file cleanup 
(CLNUP, clmain sgwJ) 

6nltb (fckfin) success exit from file check 
(CLNUP, fckfin sgwJ) 

6nkc (fckbad) failure exit file check 
(CLNUP, fckbad sgwJ) 

6nlid (crsu) check ring blocks 
(CLNUP, crsu sgwJ) 

6nke (csdb) check SDB's 
(CLNUP, csdb sgwj) 

6nU (cvdb) check VDB'S 
(CLNUP, cvdb jgwj) 

6nl*.g (cqb) check keyword block 
(CLNUP, cqb sgwJ) 

6niih (ckstrc) check structure of file 
(CLNUP, ckstrc :gwj) 

6nh± (patch) patch break in ring 
(CLNUP, patch :gwJ) 

6nlij (fr) free a lost element 
(clnup, fr sgwJ) 

6nl*k (fstftl) store tail flag 
(CLNUP, fstftl sgwJ) 

6nkl (fstfhd) store head flag 
(CLNUP, fstfhd sgwJ) 

6nkm (fstnare) store name 
(CLNUP, fstnam sgwJ) 

6nlin (legali) check for legal PSID 
(CLNUP, legali sgwJ) 

6nko (legald) check for legal PSDB 
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(CLNUP, legald jgwj) 

6nlip (legalv) check for legal PVDB 
(CLNUP, legalv :gwJ) 

6nliq (blksav) try to save a bad random file block 
(CLNUP, blksav :gwj) 

6nfcr (gfrfb) get a rfb for CLNUP 
(CLNUP, gfrfb :gwj) 

6nka (fldstb jgwj) lod sdb 
(CLNUP, fldstb :gwj) 

6nH (fldvdb) load VDB 

(CLNUP, fldvdb :gwj) 

6nkn (gdsdb) check SDB 
(CLNUP, gdsdb :gwJ) 

6niv (chkdb) check data blocks for statement 
(CLNUP, chkdb ;gwj) 

6niiw (getchr) read character from AD8 
(CLNUP, getchr :gwj) 

6nltx (badchr) replace bad character in SDB 
(CLNUP, badchr sgwj) 

6nky (upit) update pointer for CLNUP 
(CLNUP, upit SKWj) 

6nkz (updasp) update pointer for CLNUP 
(CLNUP, updasD sgwj) 

6nlia@ (fchlst) fetch lost elements 
(CLNUP, fchlst :gwJ) 

6niiaa (dump) free lost elements 
(CLNUP, dump !gwJ) 

6nkab (chkpnt) check pointers 
(CLNUP, chkpnt sgwj) 

6nkac (crnch) crunch pointer table 
(CLNUP, crnch igwJ) 

6niiad (fxnara) copy of extra name for CLNUP 
(CLNUP, fxnam !gw«7) 

6nkae (nuhash) generate new hash's for all statements 
(CLNUP, nuhash :gwj) 
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<Snfcaf (outres) output results of CLNUP 
(CLNUP, outres :gwJ) 

60 {passl) qed Input 

601 link to file (nls, passl, :xbjhnz) (kdf MOD 

602 starting location: orguty* page 

603 cells used! 

6p (ioctl) i/o control 

6pl link to file (nls, ioctl, :xbjhnz) (Kdf ERICKSON) 

6p2 starting location: orguty«2ii.000 page 5 

6p3 cells used: 27762 

6pli. procedures in the IOCTL overlay 

6p5 % free core and save blocks % 

6n5a (fixun) fix user name at start of file name 
(IOCTL, fixun :gwj) 

6pSb (frecor) write core blocks on random file 
(IOCTL, frecor :gwj) 

6p5c (frcrff) close current, open working file 
(IOCTL, frcrff :gwj) 

6t>5d (copfil) copy file 
(IOCTL, copfil :gwJ) 

6nSe (wrtblk) write file block 
(IOCTL, wrtblk :gwj) 

6oSf (copblk) copy file block from input to output 
(IOCTL, copblk :g*J) 

6p6 % open files % 

6p6a (rdhdr) read header block of file 
(IOCTL, rdhdr :gwJ) 

6n6b (opnckp) open checkpoint file 
(IOCTL, opnckp :gwj) 

6n6c (opnfil) open file 
(IOCTL, opnfil :gwj) 

6p7 %jurap file stack % 
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6p7a (pushno) push current view on file stack 
(IOCTL, pushno :gwJ) 

6o7b (pophs) pop an element from file stack 
(IQCTL, pophs ?gwj) 

6p?c (bumpho) read nest file stack element 
(IQCTL, bumpho :gwJ) 

6o7d (rtnhs) read file stack entry 
(IOCTL, rtnhs igwJ) 

6p7e (stkchk) remove word from file stack 
(IOCTL, stkchk :gwj) 

6o7f (pshhs) push word on file stack 
(IOCTL, pshhs IgwJ) 

6p7g (pphs) pop word from file stack 
(IOCTL, pphs :gwj) 

6p8 % save and restore viewspecs % 

6p8a (isavlt) create word to save viewspecs 
(IOCTL, isavlt sgwj) 

6n8b (ireslt) restore view specs 
(IOCTL, ireslt :gwj) 

6p? % jump stuff % 

6p9a (clrjs) clear jump stack 
(IOCTL, clrjs sgwJ) 



6n9b (fusern) set file user name 
(IOCTL, fusern :gwj) 

6p9c (savrff) save working copy data 
(IOCTL, savrff SgwJ) 

6p?d (of date) open file date 
(IOCTL, of date sgwj) 

6p?e (fnroot) get file name from root 
(IOCTL, fnroot :gwj) 

6n9f (lnktyp) determine link type 
(IOCTL, lnktyp !gwj) 

6p9g (Inknul) determine if null link 
(IOCTL, Inknul :gwj) 

6p9h (pushjs) push on intrafile jump stack 
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(IGCTL, pushes :gwj) 

6p9i (popjs) pop intrafile jump stack 
(IOCTL, popjs SgWJ) 

6p9j (bump,js) read next jump stack element 
(IOCTL, burapjs :gwj) 

6p9k (pshjs) push word on intrafile jump stack 
(IOCTL, pshjs :gwJ) 

6p91 (ppjs) pop word from intrafile jump stack 
(IOCTL, ppjs sgwj) 

6pl0 % spl for IOCTL % 

6olOa (fwait) wait for IOCTL 
(IOCTL, fwait :gwj) 

6d10P (f jwait) jumD wait 
(IOCTL, fjwait :gwJ) 

6nlOc (qlq) load file or checkpoint 
(IOCTL, qlq sgwj) 

6pl0d (qlf) load file 
(IOCTL, qlf SgwJ) 

6plOe (qlc) load checkpoint 
(IOCTL, qlc !gwJ) 

6plOf (opns3i) open type 3 symbolic file or input 
(IOCTL, opns31 :gwJ) 

6plOg (rstfil) open current file and recreate display 
(IOCTL, rstfil :gwJ) 

<§plOh (ofstn2) open file, name given in STN 2* 
(IOCTL, ofstn2 :gwj) 

6nlOi (qoq) main output control 
(IOCTL, qoq :gwJ) 

6plOj (opns3) open symbolic type 3 file for output 
(IOCTL, opns3 igwj) 

6plOk (opnfo) open random file for output 
(IOCTL, opnfo igwJ) 

6plOl (qof) output file 
(IOCTL, qof sgwJ) 

6plOra (qoc) output checkpoint 
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(IOCTL, qoc igwJ) 

6plOn (spcdpy) spec display for link routines 
(IOCTL, spcdpy ;gwj) 

6plOo (sethfn) set jump file name 
(IOCTL, sethfn :gwj) 

6olOp (qbl) dump link 
(IOCTL, qbl sgwJ) 

6plOq (qjj) dump return 
(IOCTL, qjj SIWJ) 

6plOr (qja) jump ahead 
(IOCTL, qja :gwj) 

6plOs (qbq) jump file 
(IOCTL, qbq :fwJ) 

6pl0t (qaq) alarm clock 
(IOCTL, qaq :gwJ) 

6pll % Insert QED and pass k % 

6plla %lnsert QED and pass k % 

6pllal (stpasii) start pass k 
(IOCTL, stpasli :gwJ) 

6plla2 (pslcse) convert case for pass 1 
(IOCTL, pslcse :gwj) 

6plla3 (qiq) insert QED branch 
(IOCTL, qiq :gwJ) 

6nllb % portal % 

6pllbl (cap) activate portal processor 
(IOCTL, cap :gwJ) 

6q (seqgen) seqgence generator overlay 

6ql link to file (NLS, seqgen, :xbjhnz) (kdf MOD 

6q2 starting locations orgutyOOOOO page 6 

6q3 cells used: 32263 

6qk procedures in the SEQGEN overlay 

6alia (fcp) fix character position - CA pop 
(SEQGEN fcp :rwJ) 
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6qkb (lc) logical complement - OA pop 
(SEQGEN, lc sgwJ) 

6qkc (pep) push character position - CA pop 
(SEQGEN, pep :gwJ) 

6qkd (ieq) initials equal - CA pop 
(SEQGEN, leq SgwJ) 

6qlie (ine) initials not equal - CA pop 
( SEQGEN, lne SgwJ) 

6qk£ (sne) date since - CA pop 
(SEQGEN, sne sgwJ) 

6qkg (bfr) date before - CA pop 
(SEQGEN, bfr :gwJ) 

6okh (rst sgwJ) reset flag - CA pop 
(SEQGEN, rst SgwJ) 

6qiii (scp) set character position - CA pop 
(SEQGEN, scp sgwJ) 

6ok6 (atst) string test, addressin A - CA pop 
(SEQGEN, stst SgwJ) 

6qkk (atstf) string test, address in A, floating CA pop 
(SEQGEN, atstf SgwJ) 

6qlil (tst) string test, string in code, - CA pop 
(SEQGEN, tst sgwJ) 

6alim (tstf) string test, string in code, floating - CA pop 
(SEQGEN, tstf SgwJ) 

6oltn (tstr) test string - CA 
(SEQGEN, tstr sgwJ) 

60I10 (tstfr) test string, floating - CA 
(SEQGEN, tstfr :gwj) 

6akp (geft) get character for test - CA 
(SEQGEN, geft JgwJ) 

6qkq (arb) arbitrary number - CA pop 
(SEQGEN, arb :gwj) 

6qkr {bfs) branch false and scan - CA pop 
(SEQGEN, bfs sgwJ) 

6qks (tore) branch on repeat count - CA pop 
(SEQGEN, brc :gwj) 
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6okt (ccp) compare character positions - OA pop 
(SEQGEN, ccp tgwJ) 

6qliu (ccv) character class value - CA pop 
(seqgen, ccv :gwj) 

6q)jv (pps) pop push down stack - CA pop 

(SEQGEN, pps !gwj) 

6qltw (sd) set direction - CA pop 
(SEQGEN, Sd SgwJ) 

$qkx (cpf) character position function - CA pop 

(SEQGEN, cpf :gWJ) 

6q|y (pdc) pointer decrement - CA pop 
(SEQGEN, pdc :gwj) 

6qkz (fechsl) initialization for sequence generator 
(SEQGEN, fechsl :gwJ) 

6qlia@ (fechsn) fetch next statement - sequence generator 
(SEQGEN, fechsn :gwJ) 

6akaa (seqset) set up for sequence generator 
(SEQGEN, seqset sgwJ) 

6qliab (seqnxt) get next PSID in sequence 
(SEQGEN, seqnxt :gwJ) 

6cliac (seqpat) check statement for pattern match 
(SEQGEN, seqpat :gwJ) 

6qliad (getint) get initials from SDB 
(SEQGEN, getint :gwJ) 

6qkae (gettim) get time from SDB 
(SEQGEN, gettim :gwJ) 

6qiiaf (getdat) get date from SDB 
(SEQGEN, getdat SgwJ) 

6qkag (stoflg) store flag for pattern match 
(SEQGEN, stoflg ;gwJ) 

6qliah (schtxt) fetch 6th word of SDB leader 
(SEQGEN, schtxt :gwJ) 

6qiiai (kyfch) Keyword sequence generator 
(SEQGEN, kyfch :gwj) 

6qliaj (stvect) generate statement number vector 
(SEQGEN, stvect :gwJ) 
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6aluk (stvctp) statement vector for successor 
(SEQGEN, stvctp :gwJ) 

6q&al (stpos) position of ring element in its plex 
(SEQGEN, stpos :gwJ) 

6 q It am (fechno) fetch statement number of given PSID 
(SEQGEN, fechno :gwJ) 

6qitan (fechnp) fetch statement nuiber of successor 
(SEQGEN, fechnp :gwJ) 

6qltao (fechnm) statement number given statement vector 
(SEQGEN, fechnm :gwJ) 

6qkap (setseq) initialize sequence generator - area 
(SEQGEN, setseq :gvrJ) 

6r (sdbmnp) sdb manipulator 

6rl link to file (nls, sdbmnp, :xb,jhnz) (kdf MOD 

6r2 starting locations orguty«21*.ooo page 5 

6r3 cells used! 2602k 

6rk procedures in the SDBMNP overlay 

6rlta (newsdb) make a new SDB 
(SDBMNP, newsdb :gwJ) 

6riib (endsdb) termination of creatine SDB 
(SDBMNP, endsdb sgwJ) 

6rkc (xtrnam) extract name from SDB 
(SDBMNP, xtrnam :gwJ) 

6rltd (comsr) compare strings 
(SDBMNP, comsr sgwJ) 

6rlte (ncis) number characters in string 
(SDBMNP, ncis JgVJ) 

6rltf (stonam) store name hash in ring element 
(SDBMNP, stonam :gwJ) 

6rkg (stosdp) store PSDB in ring element 
(SDBMNP, stosdp :gwJ) 

6rkh (deist) delete statement 
(SDBMNP, deist sgwJ) 

6rij.i (fresdb) put SDB on free list 
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(SDBMNP, fresdb ;gwJ) 

6rkj (fndrom) find room for new SDB 
(SDBMNP, fndrom :gw«J) 

6rkk (isroom) looks for adequate room for SDB 
(SDBMNP, isroom :gwJ) 

6rkl (gcolx) garbage collection of SDB'S 
(SDBMNP, gcolx :gwj) 

6rkm (gcol) garbage collection of SDB'S 
(SDBMNP, gcol :gwJ) 

6rkn (cmpfr) file compactor 
(SDBMNP, cmpfr :gwJ) 

6s (txtedt) text edit 

6sl link to file (nls, txtedt, :xbjhnz) (kdf MOD 

6s2 starting location: orguty«3kOOQ page 7 

6s3 cells used: 3?k6k 

6sk procedures in the TXTEDT overlay 

6ska (recred) recreate display 

(TXTEDT, recred :gwJ) 

6skb (subs) substitute 
(TXTEDT, subs igwj) 

6skc (subi) initialization for substitute 
(TXTEDT, subi JgwJ) 

6skd (gdmys) set dummy statement 
(TXTEDT, gdmys :gwj) 

6ske (setrot) set root statement 
(TXTEDT, setrot :gwJ) 

6skf (sttxt) set text 

(TXTEDT, sttxt :gvj) 

6skg (brkst) break statement 
(TXTEDT, brkst :gwj) 

6sli.li (staptx) join statement 
(TXTEDT, staptx :gwJ) 

6ski (stlit) create statement from literal 
(TXTEDT, stlit ;gwJ) 
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6akd (cdlim) character delimiter 
(TXTEDT, cdlim :gwj) 

6ak\i (idr) invisibledelimiter routine 
(TXTEDT, idr sgwJ) 

6slil (tdr) text delimiter routine 
(TXTEDT, tdr :gwJ) 

6skm (ndr) number delimiter routine 
(TXTEDT, ndr :gwj) 

6slm (wdr) word delimiter routine 
(TXTEDT, wdr SgwJ) 

6sho (wdr2) another word delimiter routine 
(TXTEDT, wdr2 :gwJ) 

6skp (vdr) visible delimiter routine 
(TXTEDT, vdr SgwJ) 

6sitq (deltx) delete pointers in statement 
(TXTEDT, deltx SgwJ) 

6skr (cpchtx) copy character 
(TXTEDT, cpchtx :gwJ) 

6sits (cshft) case shift 
(TXTEDT, cshft :gwj) 

6siit (del) delete text 
(TXTEDT, del sgwJ) 

6sliu (mrchtx) move character 
(TXTEDT, mrchtx :gwJ) 

6sltv (mvwdvs) move word, visible 
(TXTEDT, mvwdvs :gwJ) 

6skw (rpl) replace text 
(TXTEDT, rpl xgwJ) 

6sli.x (cpwdvs) copy word, visible 
(TXTEDT, wpwdvs :gwJ) 

6sliy {qcc) copy character 
(TXTEDT, qcc :gwj) 

6sltz (qcw) copy word 

(TXTEDT, qcw :gwj) 

6slia® (qcn) copy number 
(TXTEDT, qcn :gwj) 
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6sbaa (qci) copy invisible 
(TXTEDT, qci :gwj) 

6skab (qcv) copy visible 
(TXTEDT, qcv :gwj) 

6sliac (qct) copy text 

(TXTEDT, qct :gwj) 

6sbad (qdc) delete character 
(TXTEDT, qdc :gwj) 

6skae (qdw) delete word 
(TXTEDT, qdw ;gwJ) 

6skaf (qdn) delete number 
(TXTEDT, qdn :gw«J) 

6shag (qdi) delete invisible 
(TXTEDT, qdi :gwj) 

6skah (qdv) delete visible 
(TXTEDT, qdv :gwJ) 

6sliai (qdt) delete text 
(TXTEDT, qdt :gwj) 

6skaj (qic) insert character 
(TXTEDT, qic SgwJ) 

6siiak {qiw) insert word 
(TXTEDT, qiw SgwJ) 

6skal (ain) insert number 
(TXTEDT, qin sgwJ) 

6s bam (ail) insert invisible 
(TXTEDT, qii :gwj) 

6sit.an (qiv) insert visible 
(TXTEDT, qiv :gwj) 

6slt.ao (qit) insert text 
(TXTEDT, qit :gwj) 

6siiap (qmc) move character 
(TXTEDT, qmc :gwj) 

6skaq (qmw) move word 

(TXTEDT, qmw :gwJ) 

6sbar (qran) move number 
(TXTEDT, qmn SgwJ) 
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6skas (qmi) move invisible 
(TXTEDT, qmi ;gwJ) 

6sliat (qmv) move visible 
(TXTEDT, qmv !gwj) 

6sliau (quit) move text 
(TXTEDT* qmt !fwJ) 

6sliav (arc) replact text 
(TXTEDT, qrc sgwj) 

6skaw (qrw) replace word 
(TXTEDT, qrw :gwj) 

6siiax (qrn) replace number 
(TXTEDT, qrn :gwJ) 

6skay (qri) replace invisible 
(TXTEDT, qri jfwJ) 

6sltaz (qrv) replace visible 
(TXTEDT, qrv :gwj) 

6skb@ (qrt) replace text 
(TXTEDT, qrt tgwj) 

6siiba (osc) set character 
(TXTEDT, qsc !fwj) 

6slibb (qsw) set word 

(TXTEDT, qsw :gwj) 

6skbc (qsn) set number 
(TXTEDT, qsn :gwJ) 

6slibd (qsi) set Invisible 
(TXTEDT, qsi :gwj) 

6sltbe (qsv) set visible 
(TXTEDT, qsv :gwj) 

6siibf (qst) set text 

(TXTEDT, qst SgwJ) 

6slibg (qss) set statement 
(TXTEDT, qss igwj) 

6skbh (qpf) pointer fix 
(TXTEDT, qpf :gwj) 

6sltbi (qprs) pointer delete statement 
(TXTEDT, qprs IgwJ) 
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6skbj (qprt) pointer delete text 
(TXTEDT, qprt sgwJ) 

fiskbk (qprw) pointer delete word 
(TXTEDT, qprw JgwJ) 

6skbl (fixptr) pointer fixup 
(TXTEDT, fixptr :gwJ) 

6skbm (delptr) delete pointer 
(TXTEDT, delptr :gwJ) 

6skbn (insptr) Insert pointer 
(TXTEDT, insptr :gwj) 

fiskbo (apachr) append a character 
(TXTEDT, apachr SgwJ) 

6skbp (apastr) append a-string 
(TXTEDT, apastr sgwJ) 

6skbq (aptstr) append t-string 
(TXTEDT, aptstr :gwJ) 

6skbr (bsc) begin statement construction - pop 
(TXTEDT, bsc :gwj) 

6skbs (esc) end statement construction - pop 
(TXTEDT, esc tgwj) 

6skbt (cpp) fixup pointers and append t-string - pop 
(TXTEDT, cpp :gwj) 

6skbu (kps) append a-string - pop 
(TXTEDT, kps :gwj) 

6skbv (kpr) append a register - pop 
(TXTEDT, kpr :gwj) 

6skbw (dip) delete pointers - pop 
(TXTEDT, dip :gwj) 

6skbx (cpw) append t-string - pop 
(TXTEDT, cpw :gwj) 

6skby (pfx) pointer fix - pop 
(TXTEDT, pfx sgwJ) 

fit (cacmpl) content-analyzer compiler 

6tl link to file (nls, cacmpl, :xbjhnz) (kdf ERICKSON) 

6t2 starting location: orguty«3k000 page 7 
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6t3 cells used! 37311 
6u (outovi) output overlay 

6ul link to file (nls, p^e^s-sjhnzw) (kc($- MOL-) 

6u2 starting location: orguty»31i.000 page 7 

6u3 cells used! 
6v (mol) mol compiler 

6vl link to file (paxton, nmolr:jhnzw) 

6v2 starting location: orguty=0 page o 

6v3 cells used: 
6w (spl) spl compiler 

6wl link to file (andrews, ($^\ jnnzw) 

6w2 starting location: orgutyaO page 

6w3 cells used: 
6x (meta) tree meta compiler 

6x1 link to file (andrews, jTmeta^Jhnzw) 

6x2 starting location: orgutyaO page 

6x3 cells used: 
6y (passli) formatted hard copy 

6yl link to file i^h^hnzv) 

6y2 starting location: 

6y3 cells used: 
6z (diseuf) display buffer . 

6zl link to file {andrews, (j^jjhnzw) (^of^ P* Q \ 

6z2 starting location: orgutys31*00O page 7 

6z3 cells used: 37715 
6ae (cdsply) create display 

6a@l link to file (nls, cdsply, :xb;jhnz) (kdf ERICKSON) 
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6at2 starting location: orgutys2ii.0QQ page 

6a@3 cells used: 27630 

6a®ii procedures in the CDSPLY overlay 

6a§ka (credis) main for create display 
(CDSPLY, credis :gwJ) 

6a@itb (cdvect) create vector display 
(CDSPLY, cdvect :gwJ) 

7 (Index) categories for NLS procedure 

7a file handling 

7al (fileio) RANDOM FILE I/O 

* (lodrfb) (rdhdr) 

7a2 (filcopy) FILE COPYING 

* (copfil) (getwka) 

7a3 (filref) FILE BLOCK REFERENCING 

* (lodrsv) (lodrfb) (lodsdb) 

7afc (filcontrol) FILE CONTROL 

# (opnffk) (lodrfb) (brs66x) (rdhdr) 

7aS (statusblocks) FILE STATUS BLOCK MAINTENCE 

* (lodrsv) (lodsdb) (lodrfb) (lodvdb) 

7a6 (workingcopy) WORKING COPY OF FILE 

* (getwka) (lodrfb) (copfil) (opnrff) 

7b display 

7bl (messages) MESSAGES TO USER 

# (err) (disroes) (rerror) (abort) 

7b2 (aborts) JUST THAT 

# (err) (dismes) (abort) (rerror) 

7b3 (text-display) ROUTINES TO PUT UP FILE TEXT 

# (credis) (cdvect) 

7bk (changedis) CHANGING DISPLAY PARAMETERS 

# (diddl) 

7c input/output 

7cl (literalinput) reading keyboard input # (getlit) 

7c2 (input) work station input * (inptc) (inptfs) (inptf) 
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7d initialization 

7e structure manipulation 

7f text manipulation 

7g graphics 

8 (Bugs) list of bugs 

6a unanchored scans do not do an SCP at the start, and thus fail on 
certain multiple concats, 

8b to restore a non-existent view crashes nls 

8c the content analyzer does not reset the flags in a fie you are 
dumping to, this results in the wrong statementes beign shown. 

8d the frozen machinery does not clear its list on a .jump link, 
resulting in ugly psids beign used to create the display. 

8e Jump to end does not call pushjs (save the display position for 
jump return, ahead) 

8f fix ES so that cd doesn't blank the screen 

8g rubout sometimes does not work rights only one gets you back to 
the exec after oc. INPTRF not always getting reset?? 

8h Also, a JUMP LINK bug creates an Illegal entity abort occatlonally 
if one end of the link is the first or last character of the 
statement. 

81 Doing a JUMP FILE with a name or number in the link which does not 
exist in the file results in an abort -- with the screen unchanged 
even though the jump to the file did take place. Do a JUMP TO ORIGIN 
if this happens. 

8j There is a bug in the statement inserting level adjustment. If 
lots of U's are typed, the statement number offered is incorrect — 
then if the statement is inserted and a center dot is typed to finish 
the insert, a fatal error occurs. (This is because the SUC of is 
smashed) . 

8jl This often happens automatically on INsert qed branch if the 
origin statement (which is without a statement number) is left on 
the from of the file being inserted. 

8k On literal type-in echoing, there is still a wraparound bug. The 
last character of a line sometimes is displayed on top of the first. 

81 There are some problems with the display not being cleared 
properly if the user aborts out of a literal type-in which is longer 
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than the text on the screen. 

8m The literal type-In is erased is an abort occurs during type-in. 
For example, if the alarm clock goes off. 

8n The first line looses its indenting after an abort out of a 
literal type-in. 

80 File clean-up results in a fatal error when the file has certain 
kinds of errors in it. 

8p When typing in a file name, the user name part is not command 
recognized. But then everyone has grown used to this. RIGHT? 

6q Character selecting in a statement with special characters 
(italics, underline, blinking, etc) is often wrong and can cause a 
fatal error. 

8r Aborting out of a jump command after making a view change changes 
the view parameters but does not change the screen to match -- it 
just aborts. On the next display re-creation, the new view 
parameters are used. 

8s Aborting out of a LOAD FILE at view specifying time leaves the 
user looking at his old file, but with his new file loaded. Do a 
JUMP TO ORIGIN. 

8t The display of a literal type-in shifts to the right one character 
when a backspace character or word is typed, if the entity is word or 
visable. This is because there is a space automatically inserted on 
the front which is not diplayed to begin with, but is displayed after 
a backsoace of some kind. 

9 (map) of symbols and binaries 

9a Symbols: all bands have utilty, data, and recint 

9al 176 

9ala inpfbk, vctedt, vcted2, disbuf 
9a2 177 

9a2a inpfbk, clnup, diddl, keywd, disbuf 
9a3 178 

9a3a auxcod, inpfbk, mnctrl, prmspc, disbuf 
9ai* 179 

9alia strmnp 
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9a5 180 

9a5a seqgen, sdbmnp, txtedt, txtedt2 
9a6 181 

9a6a seqgen, cdsply, disbuf 

9b Binaries 

9131 snls 

9bla prmspc, sdbranp, recint, utilty, inpfbk, mnctri, seqgen, 
txtedt 

9b2 slNLS 

9b2a ioctl, diddl, keywd, auxcod, strmnp, cdsply, clnup, 
2txtedt 

9b3 :2NLS 

9b3a vctedt, 2vctedt, cacmpl 

10 thoughts for improvements 

10a trails 

lOal Trail returns can be done through a push down stack. Every 
time the seq-gen makes a trail branch it pushes the psid on a 
stack. The user may define a trail return syntax. If he has one, 
and it is found in a statement, the stack is poped and the poped 
psid used to start the seq-gen out again. 

10b content analyzer 

lObl Coroutines also seem to be the answer to the content analyzer 
case problem. A set of standard coroutines could be selectively 
invoked to modify the text on the way to the TST and CV tests. 
They would convert cases, skip punction, etc. They could be 
invoked and dis-invoked independent of the paren structure of the 
pattern, a la directions. 

10b2 Don't have the sequence gen. set the content flags in the 
ring unless there is a working copy. If the user is looking at a 
real file, do it the hard way, 

10b2a WATCHITS 

10b2b Don't reset the bits when the pattern is compiled unless 
a working copy is being used 

10b2c Don't even look at the bits in the seq. gen. unless a 
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working copy is being used 

10b2d when a woking copy is created, if pattern is on, reset 
all of the ring bits for pattern. 

10c editing 

lOcl Coroutines should be used for APTSTR, APCHR, and APASR, 
There will be a set of them, they check for directives, do case 
shifts, do text substitues, check for names, etc. 

lOd entity selecting (specing) 

lOdl Hake JUMP TO HAME work (FIRST & NEXT), 

lOdla This involves a new way to spec names, etc. 
10d2 Just put character pointer on spec stack 

10d2a or name hash 

10d2b or integer 

10d2c or screen position 

10d3 There is a problem with file jumps, when name or number does 
not exist - need to recreate the display so that it corresponds to 
the file. I think this is a specing problem, 

lOdli A similar problem exists when a continue is done and the file 
cannot be opened - screen is not correct. 

lOe create display 

lOel Create display should have lots of smarts. All kinds of flags 
will be set for it to find out what happened. Consider the 
following: 

lOela When first called the whole display may have to be 
recreated, so check! 

lOelal A new file loaded. 

10ela2 text not up there (e.g. the tree is being displayed) 
lOelb The sequence of statements 

lOelbl needs to be recreated if 
lOelbla A new display start 
lOelblb sequencing view parameter change 
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lOelblbl these are ca ana trail 

10elb2 needs to be checked If 

10elb2a A new statement has been put in (insert or copy) 

10elb2b Statement moved 

10elb2c Statement deleted 

10elb2d sequencing view parameter change such as 

10elb2dl level and branch only 

lOelc The formatting of statements 

lOelcl needs to be changed if 

lOelcla formatting view specs have changed 

lOelclal these are st, nos, names 

10elc2 needs to be checked if 

10elc2a These view specs have changed 

10elc2al blank line, pointers, indenting, clip, blank 
line 

10elc2b a truncation change 

lOeld a statement by statement check needs to be made, for: 

lOeldl Text changed 

10eld2 Pointers changed 

10eld3 vector part changed 

10e2 implementation scheme 

10e2a create display is called with parameters-- and puts up 
text of one file in a given screen area -- somebody above him 
knows what is going on over the whole screen. 

10e2b character bugging may be done with this scheme: 

10e2bl the mode within a given area text is uniform 

10e2b2 each given area is implicitly divided into characer 
position and each position numbered in a well defined 
manner. 
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10e2b3 A table gives the PSID and character count thuslyi 

!Ge2b3a A table entry contains a T»polnter, and two 
character counts. 

10e2b3b The character counts are character positions 
within the display area, 

10e2b3c The table Is sorted on starting character counts, 

10e2b3d A table element means that the text between the 
two character counts starts at the given T-pointer. 

10e2b3e At bug select time, a pointer to this table and 
the character count is put on the spec stack, 

I0e2c for putting text up in a hurry 

10e2cl move the text from the SDB a word at a time » perhaps 
doing a shift. - or put in nulls so a fast loop can be used, 

I0e2c2 To make this work! 

10e2c2a tab and cr should be special characters, 

10e2c2b also, a bit should be set in the ring to indicate 
that special characters are in the text, 

I0e2c2c statement-insert in a statement has that bit set 

10e2c2d Of course, we need upper and lower case display 
hardware. 

10e2c2e If the special character bit is on, do It the 
hard way, 

10e2c3 Better have some kind of check to know when the line 
is full »- then back up to a word gap, 

10e2d basic routine heirachrys 

10e2dl an overloard takes care of screen orgainzation and 
selects area for frozen statements, perhaps, 

10e2dla cdsply fills up a text area. 

10e2dlal the sequence gen plays its usual role 

10e2dla2 A statement routine calls the seq. gen, and 
puts up the blank line or initials, number, sets the 
indenting, etc, 

10e2dla2a A low level routine fills a buffer for 
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one line, 

10e2dla2b Maybe a fast guy and a smart guy, for 
special characters. 

lQe2dla3 somewhere in here a routine takes care of 
tabular data branches. 

10e2dlaii And graphic pictures 

10e3 classification of display areas 

10e3a zero dimensional areas: 

10e3al are: 

10e3ala the armed cursor 

10e3alb the disarmed cursor 

I0e3alc the bug mark 

10e3a2 are subject to: 

10e3a2a size 

10e3a2b node (intensity, filcKer, Italics) 

10e3b one dimensional areas: 

10e3bl are: 

I0e3bla echo reg. 

10e3blb message area 

10e3blc name area 

10e3bld date-time 

10e3ble command feedback line 

10e3blf viewspec(s) (one for each file area) 

10e3b2 are subject to all of the above and: 

10e3b2a position (this may be relative -??) 

10e3b2b horizontal increment 

10e3b2c columns 

10e3c two dimensional areas 
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10e3cl are: 

10e3cla the literal area 
10e3c2 are subject to (In addition to the above) 

10e3c2a vertical increment 

10e3c2b rows 

10e3c2c we may want to specify a boundary rather than 
giving rows, columns, vert, and horiz. increments. 

10e3d file areas 

10e3dl are: 

10e3dla there are several file areas. They will make the 
frozen area unnecessary, 

10e3d2 are subject to (in addition to above) j 

10e3d2a names 

10e3d2b numbers (ugh) 

10e3d2c indenting 

10e3d2d truncation 

10e3d2e blank line 

10e3d2f pointers 

10e3d2g tree 

10e3d2h initials 

10e3d2i picture clip 

10e3d2j statement-insert 

10e3d2k relative indenting (with plex only) 

10e3d21 vowels 

lQe3d2m ? special characters if the vectors are ever 
good?? 

10e3d3 are modified (filtered) by: 

!Ge3d3a content analyzer 
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10e3d3b branch only 

10e3d3c plex only 

10e3d3d sub-file 

lGe3d3e level 
10e3dlt the content (sequence) is determined by: 

10e3dlia list (normal) 

10e3dlib trail 

10e3dlic keyword 

10e3e things we forgot: 

10e3el pointers 

10e3e2 vector spacing 

10e3e3 vector scaling 

lOelt. other thoughts 

lOelia need control over parameter for literal area, frozen 
area, message area. 

lOekb want to have up to four views on screen --- up to two 
files opened for a user. Maybe two file views for each of two 
users collobrating, or one for four users... 

10eJj.c want to take a way of describing view in text — both 
view set and viewchange text strings, 

lOelid incorperate view setting and diddle stuff in same command 
- allow diddle commands in view spec part of links?? 

lOelie Want to define a sequence of views from a text string - 
then jump from one to the next on a ca. 

lOf external core usage & display 

lOfl Can all of the display buffer information fit in ADATA, with 
the buffers in external core? 

10f2 Between now and external core time, simulate it with POPs or 
something, - have UTILTY code to relabel the frozen page in and 
move a buffer into it. 

I0f3 Of course, rewrite create display and figure out the network 
business 
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10f3a MNCTRL part of it is rather clear. 

10f3b But how will PHMSPC part of it work? 

lOg file 10 

lOgl Aviod creating statment numbers at all costs. Perhaps 
produce relative position numbers instead. Indenting by credis 
creates a problem (but not when branch only Is on). Need to keep 
the level or vector for the statement at top of screen. 

10g2 We can cut down on the amount of file 10 by 

lQg2a Having copfil write out the blocks from core rather than 
reading all blocks and copying them, 

10g2b Have frecor avoid calling getwka unless it has to write a 
block, we would also need a word in the file header to 
indicate that it was changed to make this work. ??? 

10g2c Have a usage table for core blocks - have LOBRFB write 
out the block used least since the last write. - This table 
maintained by the LOD routines (IQDSDB, LODPSV, LODVDB, etc). 

10g3 The readability of opnfil can be improved if it is rewritten 
to get rid of all its labels and GOTQs. 

lOh efficient use of the data page 

lOhl A longer input buffer should be used when PASS1 is running 

10h2 Perhaps It will be necessary to have another R¥ page to 
contain seldom referrenced Informatlo. such as file link stack, 

10h3 How to make all kinds of room in ADATA: 

10h3a Perhaps use cells 20b to 77b? 

10h3b Rewriting the overlay stuff will make the RW table quite 
small (one word for each overlay). 

10h3c Putting out better SPl code may cut down the string area 
needed. 

10h3cl The case save block may be eliminated. 

10h3d All non-writable cells should be moved to UTILTY. 

10h3e All lowest level subroutines can share temps since they 
call no one. This is true even in UTILTY. 

10h3f The KHAR block for PASS1 could be eliminated by having 
PASS1 obtain a RF core block. Or Passl could fit in a RW page 
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from c-NLS, and have it's own very large duffer, 

10h3g How about having the routines that ao overlay calls and 
need to save their return location do it on their own -* then 
the data page can he squeezed rather simply, 

10h3h ICORTB can be in UTITLTY or better yet, in R1CINT. 

10h3i Can the OA code be put in a RF block:?? Just how would it 
worlc if the pattern went with the file? 

10h3j Some file parameters are unnecessary. 
lOhk Give content analyzer a IK core block for RW storage. 
lOi more effecient spl code 

lOil overhaul the input-feedback code produced by the compiler. 

lOila Put out more dense code that simplifies the pops. 

lOilb Use string addresses, not register numbers. 

10i2 Make the syntax for overlay calls the same as the link 
syntax. 

10j new features 

lOjl Have OPNFIL accecpt a ? after file name, to type a different 

name • 

I0j2 A smart RDHDR procedure will be needed when the file header 
format changes considerably. Have it update an old kind of header. 

10j3 Try to code the universal status block loading procedure; 

lOjJi, Have code to initialize the data page and disbuf in RECINT 

10j5 Write the merge file stuff. « figure out the multiple file 
buisness, 

10J6 Put in JUMP TO CONTEXT VISIBLE, TEXT and WORD. 

10j7 Fix up some miscellaneous stuff, namelys 

10j?a put view spec wait in JL, JF-, JR.JA 

10j?b Fix alarm clock overflow problem 

10j7c Don't create a statement number unless it is absolutely 
necessary 

I0j7d EXECUTE LINK SHOW (file links, ahead and return) 
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10j7e change IDENTITY to ITEM 

lOjd LOAD PROGRAM and OUTPUT PROGRAM commands. 

10 j9 EXECUTE FINISHED and LOGOUT commands. 

lOjlO Put in the file ©ranch select (The real branch only) . 

lQjll Have Jr and Ja return to previous jump command 

1QJ12 collect statistics on number of file iQ's per DFS, This 
varies a great deal with kind of operations. Need a way to 
control it to get meaningful numbers. 

10k wild ideas? 

10k! have the ability to get another page for RF blocks (jimmy up 
rfifcbx and crpgad) for things like file cleanup, gcol and maybe 
create display. 

10k2 have a "continue" copy of a compiler around, would need to 
load it, use it, and dump it to a file for later use. The idea is 
to save the symbol table. 

10k3 Give PASSJi a page to scratch in so that it won't use fechcl 
to run up and down the statement, 

lOkij. Could we have PASSii go directly to the printer - using the 
display buffer page, or external core. This would spread out the 
compute load considerably. 
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1 NLS Random file structure and handling /NLSFILES 

la General description 

lal The major design considerations for NLS files determined the 
present format and structure. 

lala It is desirable to have virtually no limit on the size of 
a file. This means that it is not practical to have an entire 
file in core when viewing or working on it. 

lalb A goal in the design was to have the time involved to 
carry out operations on a file not be linear with the length of 
a file, but remain constant as a function of the length of a 
file. That is, small operations on a large file should take 
the same time as on a small file. In this way the user and the 
system do not pay a penalty for large files, 

laic The system had to include graphic statements, and perhaps 
other forms of data, as well as text, 

la2 As a result of these considerations, a random file scheme was 

chosen. The file is logically divided into IK blocks. There are 

several different types of blocks, and each type has its own 
structure, since it contains a different type of data, 

la3 The structure of a file is entlrly separate from the data that 
makes up the contents of the statement. Different types of blocks 
(i.e. not structure blocks) contain the contents. Some blocks 
contain Information that is part of the file, but does not belong 
to the structure, 

lali The following size limitations were placed on files In 
general: 

lafca The maximum number of statements Is 2032. (This is 20ii8 
minus 2 RSV elements for each of eight structure blocks), 

lakb The textual part of a statement is limited to about 3000 
characters. Special characters (boldface, underline, italics, 
etc.) count as two characters. 

lake Any other data asoclated with a statement is limited to a 
maximum of IK file block (for example a picture). 

Ia5 Several limitations are parameters to the system at system 
assembly time. These are currently set as follows. 

laSa The structure of a file is limited to 13 levels in depth. 

laSb A statement name is limited to 30 characters. 

lagc The total number of text blocks allowed is 55. 



Ia5d The maximum number of pointers is 10, 

laSe The total number of random file blocks cannot exceed 6k, 

laSf The maximum number of vector data blocks is 1, 

lb File Block structure 

lbl The header block 

lbla in each file, there is a header block that contains 
information about the particular file. 

lblb The header block remains in memory while an NLS user is 
working with the file. 

Iblc The contents of the header block: 

lblcl (FCREDT) The file creation date, 

lblc2 (FUNO) The file owner's user number. This is the NLS 
user that created the file, 

lblc3 (NLSVWD) A secret word that indicates the header 
format. At present there is only one header format in use. 

lblcli (HEDSZ) THe number of words in the file header block, 

lblcS (FINIT) The initials of the user that last wrote the 
file. 

Iblc6 (LWDAT) THe date at the last writing. 

Iblc7 (LWTIM) The time at the last writing (in system 
format- see brs 39) . 

Iblc8 (NAMDL1) THe left name delimiter character, in the 
rightmost byte, 

lblc9 (NAMDL2) And the right name delimiter. 

lblclO <RALS) THe running average length of statement in 
characters. 

lblcll (TNSG) THe total number of statements generated in 
the life of this file. 

Iblcl2 (RFBS) The random file block status. 

Iblcl2a (rfbstl) The number of words in the RFBS table, 

lblcl2b Each word of the RFBS table corresponds to a 
random file block, and indicates the status of that 



block. The file header Is file block zero. The number 
in the RFBS entry means: 

lblclSbl (zero) the block is not allocated, and does 
not exist, 

Iblcl2b2 (positive) The block is allocated, and is in 
memory rather than on the 10 device, and the positive 
number is the actual starting memory location for the 
block. 

Iblcl2b3 (minus one) The block is allocated, but has 
not been initialized, 

lblcl2bfc (negative) The block is not in eore. The 
number is the negative of the used word count. In the 
case of text blocks, -2 indicates that the block 
contains no garbage SDB's, and need not be garbage 
collected, 

lblcl3 (SDBST) The SDB status block table indicates the 
status of each SDB type block. The value of an SDBST entry 
means: 

lblcl3a (zero) The block is not allocated, 

lblcl3b (non-zero) The value gives the block number, that 
is, the entry into RFBS for that block. 

lblclk (SDBSTL) the number of entries in SDBST. 

lblclS (RSVST) The RSV status block table indicates the 
status of each RSV type block. The values have the same 
meaning as for SDBST. 

Iblcl6 (RSVSTL) The number of entries in RSVST, 

lb2 File block format 

lb2a Each random file block has a eight word header. This 
header contains: 

lb2al (0) The checksum of the block. 

Ib2a2 (1) The used word count (always greater than the 
header size) . 

Ib2a3 (2) The block type, to indicate 

Ib2a3a (0) The header block 

Ib2a3b (1) an SDB block 



Ib2a3c (2) The query block 

Ib2a3d (3) an RSV block 

Ib2a3e (li) A vector block 

lb2aii (3) In the case of 

lb2afca Rsv blocks, the free list pointer 

lb2altb SDB blocks, the grabage collection flag (»-l if 
collected) . 

Ib2a5 (k) The status table entry number (not HFBS entry, but 
SDBST or RSVST entry, or etc.) 

Ib2a6 (5-7) not used 

lb3 RSV blocks 

lb3a RSV blocks contain the structure of the file. Each block 
contains the structure of a maximum of 25k statements. There 
can be up to eight RSV blocks in a file, but not all need be 
allocated, 

lb3b The block is broken into 2$k four word RSV elements, each 
potentially describes the structural location of a statement, 

lb3c Each four word RSV element in an allocated block is either 
in the structure of the file, or it is on the free list for the 
block it is in. Free lists consists of a chain of pointers, 
starting with the third word of the RSV block header, and 
ending with a zero pointer. A pointer here, is a relative 
address based on zero for the first word of the block. The 
pointers are in the first word of the four word element, and 
the other three words are zero. See (inpfbk, newrsv) , 

lb3d A RSV element is ponted to by a PSID. The 3 high order 
bits give the RSV block number (entry into the RSVST table), 
and the 8 low order bits of a PSID indicate the location within 
the block, approximately. 

Ib3dl This is approximate because PSID«s start at zero, and 
the first eight words of each block contain the header. 
Thus, before breaking the PSID, a displacement is added 
(RSVHDR), which is two. Then the high order 3 bits are the 
RSV block number, and the low order 8 bits, when multiplied 
by k, give the relative address of the element within the 
block. 

Ib3e Every file has at least one RSV element in the structure. 
That is the origin statement and is always PSID zero. THat is, 
it's RSV element is the first element in RSV block zero. 



Ib3f The contents of a RSV element are described in (dataforms, 
ring element) . 

Ibk SDB blocks 

Ibka A type one random file block is made up of SDB (statement 
data blocks). A SDB contains the text for a statement, 

lblib An SDB is a variable sized block of words with a six word 
header* 

lblibl The header contains: 

lblibla (0) 00600000b plus the number of words in the SDB. 
The sign bit is on if this SDB is garbage. 

lbfcblb (1) The PSID of this statement. 

lbiiblc (2) The date this copy of this statement was 
created. 

lbkbld <3) and the time 

Ibkble U) and initials, 

lbkblf (5) The number of character in this statement. 
This includes the ENDCHR's ? 

lbkblg (6) An integer which indicates the first character 
that is not part of the name of this statement. 

lbkc The words following the header contains the text of the 
statement, three characters per word. The text includes an end 
character (ENDCHR, code 377b) on each end of the statement. 
The last word is filled to a word boundry with ENDCHR's, An 
SDB is always an even number of words long, hence the last word 
may not be used. 

lbkd The characters in a statement are explicitly numbered, 
with the first ENDCHR being number zero. A two word entity 
consisting of a PSID and a character count is a T-pointer, and 
indicates a particular character within the file. See 
(dataforms, t-pointer). 

IPS VBD blocks 

lb6 Others 

lb6a (query) 

lb6b (spchr) 
lc Handling 



lcl Core tables, 10 

lcla The random files are read into core by blocks, two pages 
in NLS (RFBP1 and RFBP2 overlay pages) are logically divided 
into four IK core blocks to contain the file blocks. Thus, up 
to four file blocks may be in core at a time. When a file 
block is requested, if all four are in use, one block will be 
written out. Core blocks may be "frozen" in, however, so that 
they will not be changed. 

lclb The file block 10 is handled by (utilty, lodrfb:*). 

Iclc (BFIFCB) The random file index for core blocks indicates 
which file block is in each core block, A zero indicates that 
no file block is there, a positive number gives the random file 
block number (index to RFB3). 

lcld (FRZCPT) The frozen core block table indicates which of 
the core blocks have been frozen. "frozen" indicates to the 
file block loading procedure (LQDRFB) that that core block must 
not be changed. 

lcle (CRPQAD) the core block address table gives the actual 
core aress for each core block. 

lclf {RFICBX) The core blocks are numbered from zero to RFICBX, 
currently three. 

Ic2 File copy see (ioctl, copfilsg). 



:AHIDS, 07/03/69 1105:2? MGC I 

1 AHI DATA STRUCTURE 
la A.M. 276 CLASS NOTES 
lb Compliments of the HYPERTEXT EDITING SYSTEM ? 

lbl CENTER FOR COMPUTER & INFORMATION SCIENCES V -7 

162 BROWN UNIVERSITY 

163 PROVIDENCE, RHODE ISLAND 

lbfc 30 March, 1969 

2 1. SDATA %STRUCTURE 

2a The AHI data structure has as its basic unit the "statement." The 
statement is the smallest textual unit defined, ana is simply a 
textual string. The file (i.e., collection of statements) is 
hierarchically oriented in a tree structure, each statement being a 
node in the tree. The reasons for this hierarchical structure will 
be discussed later. The file, however, can be viewed in other ways 
different from the sequential tree structure. For instance, 
associational trails can be drawn throughout the file and followed, 
Thus the AHI file is capable of modeling Bush's .FTNilj 1. V. 
lbush, "As We May Think", Atlantic Monthly, July "li5. .FTN*0j 
network of associational trails as well as a sequential hierarchical 
text. 

2al 1.1 %THREE %TYPES %0F %BASIC ^ENTITIES 

2ala A. Statements 

2alb 0. Vectors 

2alc C. Keywords 

2alcl These three types of entities are stored in statement 
data blocks (SDB's), vector blocks, and keyword blocks, 
respectively. In addition, the hierarchical structure of the 
text is stored in ring blocks. We will only discuss the 
statement data blocks and ring blocks and their relation to 
the main file; the access and storage of vectors and 
keywords is very similar and so do not need to be discussed 
separately. (In the present version of the system, the only 
types of vectors that can be stored are straight lines, and 
no sketching facility exists other than defining the 
straight line by its endpoints. There is no rubberbanding, 
A sketching facility is planned for a future version.) 

2a2 1.2 ^STATUS %TABLES 



2a2a Associated ,FTN*lj handwritten note': All status tables 
are in the Mile %header (block 0) ,FTN=0} with each set of 
blocks (there are four sets of blocks: the ring blocks, the 
statement data blocks, the vector blocks, and the keyword 
blocks;? there is a snail status table which has an entry for 
each block of its kind. Thus there is a ring status table, a 
statement status table, a vector status table, and a keyword 
status table. The entry for each block in the status table 
simply points to a "global" random file status table block, 
which gives the location of each block, whether in core or on 
drum, (See Fig. 1) 

2a2al .ILL«U FIG. 1 Status Tables 

2a3 1.3 %RAND0M %FILE ^STATUS STABLE MIOCK 

2a3a The random file status table block is a block that 
contains an entry for every block of every type in the system 
(actually, there is an RFSTB for each (active file). Each 
entry tells whether the block is in core or not, or whether it 
is unallocated (i.e., not being used at the present time and 
can be allocated when a file is exa, expanded through editing), 
The entry also gives the information on where the block is 
located, on the drum or in core. It is through the RFSTB that 
each desired block is located by the system: 

2a3b As we saw in 1.2, each ring block is mapped into an entry 
in the ring status table, each statement data block is mapped 
into an entry in the statement status table, etc. Then each 
entry in each status table points to an entry in the bigger 
RFSTB (at present there are a maximum of 6k blocks in the 
RFSTB) , one containing pointers to the actual location of each 
different block in the file. This double-table method of 
location of each block is to facilitate control of the 
allocated and unallocated area on drum, and for garbage 
collection; furthermore, this central location mechanism 
allows blocks to be moved in the system, without internal 
pointers having to be modified. 

2a3c The RFSTB contains information other than dust a pointer 
to the block, whether in core or on drum. One area of the 
RFSTB if it is less than zero, indicates the block is on the 
drum. If the number in this area is negative, it is the number 
of free words in that block. This is to prevent needless 
retrieval of the block for additions if there is not enough 
room on it for the desired update, If this area is greater 
than zero, the block is in core and the number is the core 
address of the block. There is another area in which an 
indicator (at present a-2) says free space is too small to 
consider going there. This is computed from the average 
lengths of the statements, 

2a3d The ring status table at present has eight entries, one 



for each of eight ring blocks. This number is expandable, and 
is an assembly tine variable. There are probably twice or 
three tines as many SDB'S .FTN»1; handwritten notes about 55 
presently .FTN*Os and therefore the statement statusstabie is 
correspondingly bigger. 

2aU l.b %STRUCTURE %0T %THE *RING %BLOCK 

2aka Each statement is represented in the data structure both 
by its associated text (see SDB's) and by a ring element, that 
is, by an element of a ring that contains the hierarchical tree 
structure of the file and points to the text associated with 
each node (statement9 in the tree. The ring is broken into 
ring blocks, each of which is 1021t words long. Each ring block 
has a header and then is composed of ring elements, each four 
words long, one ring element per statement (See Fig. 2); 

2aiial notes pointers to ring elements are called PSTD'S 
(permanent statement ID) and never changes during the 
existence of a statement. 

2aka2 .ILL*l; FIG. 2 Ring Block Elements .ILL*0; 

2aka2a Fointer (PSDB) s the internal pointer to the 

statement text in a statement data block (SDB), (The 

structure of an internal pointer (symbolized by P) will 

be discussed in Section 1.6) 

2aka2b Flagss (this would require updating the entire 
ring after every structure change). 

2aka2bl 1) on if the statement has a name 

2aka2b2 2) pattern filter tested? 

2aka2b3 3) pattern filter result? 

2aka2c Successors a pointer to the ring element 
(anywhere in the ring) of the next succeeding statement 
on the same level. 

2aka2d Subs a pointer to the ring element of the first 
statement In the level directly below the current 
statement. 

2aka2dl The sub and successor pointers define the 
hierarchical tree structure, 

2aUa2d2 SUB points to this ring element if there is 
no substructure 

2aka2e Hs on if this statement is a head 



2aka2f Ts the last successor on each level points to 

the source (up 1 level) of that level, thus providing a 

back pointer. The T bit is set when it is the last 
successor. 

2alta2g Name hash! this is a 2U-bit hash of the 
(optional) statement name. Thus when jumping: by name, we 
need only scan each ring element sequentially to get 
correct statement. This may be done sequentially since 
each file generally consists of only about 300 
statements. 

2aka2gl note: unused ring elements in a given ring 
block are linked together on a free list -- pointed to 
by a pointer in the block header. 

2aS 1.5 ^STATEMENT %DATA SBLOCK (%SDB) 

2a5a The statement data blocks (SDB's) are simply areas in 
which to store the statement text. No structure or hierarchy 
is part of the jsdb's since that is taken care of by the ring 
blocks. The system tries to put all sequential statements in 
the same block to save on drum I/O. The process of initial 
generation and placement of statements in the SDB'S will be 
discussed in section 2. (See Fig. 3) 

2a5b ,HL«lj FIS. 3 Statement Data Block Elements 9 XLL~Oj 

2a5bl CKSUM: this is a checksum to check against hardware 
I/O errors in reading the statement data block from drum. 
Before writing out on drum, the system adds up all words in 
the SDB and stores the sum in CKSUM, on read-in, it re-adds 
the words and checks to see if the sum is the same. .FTNsis 
Handwritten note* All Ik file blocks are checksummed in 
this way ,FTN*0} 

2a5b2 Headers this contains the initials, date, and time 
of last user and change, fields which can be used as a later 
means of retrieval. 

2aSb3 PSID; Back pointer to ring! this is an internal 
pointer (of type p) to the ring element representing this 
statement in the text hierarchy, i.e., the ring element 
which points to this statement. 

2a5bl* Flags: the first bit indicates whether this SDB 
element is garbage, and is used when compacting the SDB 
Other bits indicate whether it is difficult to format the 
statement on the display, that is, if the statement 
contains things like underlining or flicker. If it is 
difficult to format, the low speed scanning/ formatting 
routine is used, otherwise the high-speed routine is used. 
This saves up to 50% on time. ,FTN=l; handwritten notes 



(this is not actually done on current system, but just wait) 
,ftn*Oj (Other bits for other things.) 

2aSb5 Text: the text is stored in the statement data block 
as follows: there are two kinds of characters, (1) 8 bit 
character, with the high order bit off, and (2) 16 bit 
characters. If the high order bit is on, this signals that 
the character is a 16 bit character, The seven next high 
bits signify font, etc., of the character represented in the 
second eight bits. The different qualities of each 
character are underline, blinking, italics, boldface, etc. 
The user can make up his own special characters and the 
system will insert it. This is done by giving the special 
character a number. It takes less than 10 msec, to reformat 
a display, (I/O not included) 

2a6 1,6 ^LOCATING ^STATEMENT %IN STHE fcDATA ^STRUCTURE 

2a6a 1.6.1 ^Mapping ^Statements %to flRing %81ock %Elements 
^Through %the ^Internal %Name (^Pointer) %? 

2a6al When statements are created, they are assigned by the 
freelist allocator to open positions in a ring block ( to a 
ring element) and assigned to statement data blocks 
according to the "garbage bits"; they are also assigned an 
internal (position related) name in the ring block denoted 
by p. All ring block vacancies are kept on the freelist. 
The internal name P in the ring block is thus assigned by 
getting it off the freelist (creating a map from statement 
name position to internal name, and from internal name to 
block position) as described below: 

2a6a2 Say that we want to retrieve statement P, an internal 
name (pointer) of the type found in the successor and sub 
fields of the ring element. It is listed in the file header 
where it gives the point in the ring where the file starts, 
i.e., it points to the ring element representing the first 
statement in the file, 

2a6a3 To get statement P (11 bits) we look at P*tu which is 
13 bits long (See Fig. k) . The upeer 3 bits are an index on 
the 8-entry ring status table (RST), The entry in the RST 
points to an entry in the random file status table block 
(RFSTB). This entry in the RFSTB tells us whether the ring 
block contains the containing the desired ring element is 
in core or not, or whether it is unallocated (in which case 
an error condition exists). The ring block is brought into 
core if necessary. The lower 11 bits of P*ii then form an 
index relative to the start of the ring block that bring us 
to the appropriate ring element. Thus from the Internal 
name of the statement we retrieve the desired ring element. 

2a6a3a ,ILL*lj FIG. li Structure and Mapping of 



Internal Pointer P 

2a6aij, Notes on the file header: this contains pointers to 
all status tables and their lengths, and information on the 
virtual memory map. It also contains bibliographic 
information which may be used as a means of retrieval* last 
time written into, username, initials of last user, Jump 
delimiters (these are the marks that delineate a jump, and 
in the present veeslon are general parentheses), average 
length of statement {determined by how much activity over 
periods of time). This information is all contained in the 
first Ik words. An interesting feature is that the its 
system will accept any amount extendable to IK without using 
excess drum space. »FTN»1; handwritten note? 256 word 
chunks, I believe .FTN»Oj 

2a6aS The first ring element at the start is dummy; and is 
the start of the file. When the system rewrites the file on 
drum after use, it searches to the first semicolon and puts 
in place of what is ttere the file description! username, 
initials, date 

.FTNsi; handwritten note? filename ,FTN»0; initials, 
date and time, etc. of last use. 

2a6b 1.6.2 %Mapping %From %the %Ring ^Element %to %the %Text 
%of £the ^Statement %(See $Flg. %$) 

2a6bl . ILLoij FIG. 5 Mapping from Ring Element to Text 
,ILL*Q; 

2a6b2 Now that we have the appropriate ring element 
relating to statement P (see Fig. 2) for the structure of 
ring element, we can retrieve the statement-text for 
filter/format/display. The system takes the "pointer to 
text" in the first word of the ring element. This pointer 
is of the same structure with respect to the statement in 
the statement data block as P#li is to the ring element of 
the ring block. Thus the high bits are an index on the 
statement status table. The entry In the SST points to an 
entry in the RFSTB, which in turn points to the location of 
the appropriate SDB in which the desired statement is 
located. Once we have the appropriate SDB, the 10 low order 
bits of the original pointer point to the desired statement, 
relative to the start of the SDB (See Fig. 3) 

2a6c 1.6.3 ^Generating %a %Sequence fof ^statements 

2a6cl Given the appropriate individual statement P (see 
Fig. 3 for structure of the statement entity), the sequence 
generator now takes the statement text for 
filtering/formating/display, as described in Section 3. 



2a6c2 Which statement is taken next depends on the sequence 
being followed by the sequence generator. If the sequence 
generator is following the basic hierarchical tree 
structure, it will look at the ptr-to-sub field in the ring 
element {Fig. 2), and use that pointer as it used P above. 
(However, if a filter is set for a specific level and 
statement P was on that level, the sequence generator will 
ignore the sub field and take the ptr-to-successor field, 
.FTNai; handwritten note; has to find the level of the 
first statement and Jceep track of it ,FTN»0; 

2a6c3 The sequence generator, however, may be following an 
associational trail. If this is the case, the content 
analyser will scan the statement-text P for the appropriate 
trail marker. If it finds the appropriate trail marker in 
the statement-text, it will hash the name in the trail 
marker, and scan the name hashes of the ring elements until 
it finds the correct ring element, and continue generating 
statements from there. If the appropriate trail marker is 
not found, it will follow the tree structure as able. 
.FTNsij handwritten notes (by hierarchy until a trail 
marker is found) .FTN*0; 

3 2. %DATA %STRUCTURE '^MODIFICATION 

3a The data structure is modified through the basic editing commands 
(delete, insert, replace, move, copy, break/join) which are described 
briefly below in Section k. System features and facilities are 
described more completely in the "NLS User's Guide" (an SRI 
publication) . 

3b We will describe how the data structure is modified for an 
insert; the other types of edit-raodifications are all similar. If 
the edit is an insert, it is an insert in the middle of a statement. 
By system definition, all editing is based on the statement. The user 
types in the appropriate insert command, hits the point of insert 
with the mouse, and types in the insert. The insert typed appears on 
the screen in the literal type-in area. If the user decides the 
insert is complete, he hits the command-accept button. The system 
then makes the modification of the data structure as follows; 

3c The system computes the new length of the statement by taking the 
old lenrth of the statement in the statement data block and adding 
the length of the insert. The system then finds a free area on one 
of the statement data blocks of sufficient length to put the new 
statement. It tries to put the updated statement on the same SDB. 
If the edited statement does not fit in that SDB the system tries to 
compact the block. If that would give enough space, the system goes 
to the previous ring element and sees what SDB that statement is 
stored on and tries to fit the newly updated statement on that 
block. If it doesn't fit there, the system looks through the jsdbst 
to find any free area and fits it in anyplace. 



3d Now that the appropriate space Is allocated, the updated 
statement is constructed. This is done by copying the header of the 
original statement and the text up to the insert point, adding to 
this the literal type-in, and copying the rest of the text of the 
statement. Then the "ptr»to-text M in the associated ring element is 
changed to point to the new statement, and the garbage bit is set in 
the original statement. 

3e When any statement is edited, the system checks to see if there 
is a statement name, or label. If there is, it is rehashed and 
replaced in the ring element. Thus labels are always updated. 

k 3. ^REDUCING %THE #DATA ^STRUCTURE *T0 %k ^SCREEN ^DISPLAY 

lia The process of scanning the data structure to retrieve and 
display the desired text has four basic parts: (l) the sequence 
generator (as discussed briefly in Section 1.6,3), (2) filtering, 
(3) formatting, and (U display. 

lial 3.1 ^SEQUENCE ^GENERATOR 

bala The sequence generator is the routine that actually scans 
the data structure and generates the sequential text. 
Basically it generates a list of statements. There are three 
types of sequences that can be generated; 

iialal 3.1.1 %Tree 

iialala This is the default hierarchical structure that 
is generated and is simply the sequential text of the 
main associational trail of the text, ordered in a 
hierarchy of statements. 

Iula2 3.1.2 ^Trails 

iiala2a The trail feature is used to set up statements in 
such a way that only a particular set of statements will 
be displayed and in a particular order. The set of 
statements is called a trail, and is an associational 
trail that criss-crosses the default (main) trail; it 
provides a manner other than the normal sequence in which 
to read the text. A trail marker is set up for a 
particular trail of statements; the pattern for this 
marker can be a complex syntactical form and is followed 
by the content analyzer (described in an SRI 
publication) . 

Uala2b The trail feature is used to set up statements in 
such a way that only a particular set of statements will 
be displayed and in a particular order. The set of 
statements is called a trail, and is an associational 
trail that criss-crosses the default (main) trail; it 
provides a manner other than the normal sequence in which 



to read the text. A trail marker is set up for a 

particular trail of statements; the pattern for this 

marker can be a complex syntactical form and is followed 

by the content analyzer (described in an SRI 
publication) . 

kaia2c Trail markers are thus used to mark turning 
points from the normal sequence of statements, as a sign 
post to the next statement in the trail. Each time a 
marker appears in a statement it is followed by a 
statement name in parentheses that is the name of the 
next statement. Between trail markers statements are 
displayed in normal sequence, The trails can be followed 
only in the forward direction; there is no capability 
for inverting the trail when moving backwards through the 
text. (SRI claims that with the complex content-anaiyzer, 
this is unnecessary.) 

kala3 3.1.3 ^Keywords 

2ula3a The keyword system permits a user to construct a 
specially formatted catalog file containing references to 
other files and capable of being reordered automatically 
according to some chosen set of weighted keywords. When 
reordered, the file lists references in order of 
relevance, according to the choice and weighting of 
keywords. 

Iula3b The keywords are attached to a statement. The 
system keeps a list of the keywords containing for each 
keyword a short description of the keyword, and the 
labels of statements tagged with this keyword. This list 
is visible to the user and can be changed by him. The 
system also keeps a list of the file-reference entries, 
that is, a file of any statement name tagged with a 
keyword, and a list of the keywords it is tagged with 
following it. Thus one keyword can be attached to any 
number of statements, and one statement may have any 
number of keywords attached to it. 

Ii.ala3c The keyword system is used mainly as a 
retrieval-by-keyword system. The user selects desired 
keywords and weights them according to importance. A 
negative weight can also be used to blackball any 
keywords. According to SRI the weights on the keywords 
allow more flexibility than straight Boolean retrieval 
functions on keywords; after the user has selected 
keywords and weights, the system goes to the list of 
keywords and picks out all statements tagged with the 
selected keywords. For each statement selected the 
system computes the weights of keywords attached to it, 
and displays the names of the statements in order of 
highest total weight. Statements with a negative total 



weight are not displayed. The user nay then access the 
referenced files by using the jump command on the 
statement names. 

Ua2 3.2 ^FILTERING 

lia2a Facilities included are: level specification, branch 
only only, subfile, content analyzer, trail flags, Iterals, 
search for trail flags and literal text, etc. 

Iia2b After the main structure is generated and filtered, it is 
formatted. 

ka3 3.3 ^FORMATTING 

ka3a The formatting sets the following, and other, variables 
of display: 

lia3b Statements numbers!* 

Iia3bl Statements numbers: the number of lines of each 
statement to be displayed is variable] headers, 
time/lnitials/labels can be on/off. 

ba3c View change: character size, page size and dimensions, 
etc. 

a a* 3.U ^DISPLAY 

kaiia After the statements have been filtered out, they are 
displayed. The main display of the generated/filtered/formatted 
structure is in the file area of the screen. There are a 
number of one-dimensional registers used for man/machine 
interaction: 

iialial 1. Echo register. This__disolays the last six 
characters typed by the user, for (Jee^) feedback, 

4 ali. a 2 2, command display line. This is a line which says 
what command is In the proceas of being executed. 




Jj.a!u3 3. Name register .vMpdsplays user's name (this Is on 
a multi-terminal system). 

ball all ll# View specification areas. There are three view 
spec areas, and these are set according to the formatting 
variables described in Sec, li.2d. 

kaliaS S. Message area. An area for system messages to 
the user, such as error messages. 

j*alia6 6, literal type-in area, when the user is typing in 
an insert or delineating a command, the characters typed are 
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displayed in this area. 

kakb There is, in addition to the file area, another 
two-dimensional area, the freeze area. This freeze area Is 
used to "freeze" statements designated by the user so that 
they remain unchanged above the file area, with the file being 
then displayed in the file area. The freezed statements remain 
unchanged despite any text manipulations or file searching that 
goes on in the file area. (In a future version, the freeze 
area will be done away with, and instead the user will be able 
to multi-window any number of windows. Each window will be a 
full file area, with all one-dimensional registers in each 
window. They can be any shape or size any place on the screen, 
with multistations, a window can be assigned to a station, 
giving the users at two different terminals the ability to 
decide who holds the chalK and who holds the eraser In each 
window. 

5 ll. %SYSTEM %FEATURES %AND ^FACILITIES 

Sa fc.l ^EDITING 

Sal The basic editing commands are delete, insert, replace, move, 
copy, set, and break/join. All are self explanatory, except set 
and break/join. The set commands allow the user to change the 
font on any text string. The fonts arej capital, lower case, 
italic, roman, boldface, no boldface, flickering, non-flickering, 
underline, no underline. The break ana join commands allow the 
user to break a statement into two statements, statements; the 
join command adds a text string onto another statement. The break 
and .loin commands are the only commands that operate across 
statement boundaries. All the other editing commands are 
specialized: for example, the insert commands are Insert 
character, insert word, insert text, insert invisible, insert 
statement, insert branch. The specialized commands make it easier 
for the system to make the edits; the rationale for 
specialization is that since you have to type the command in you 
may as well specialize, and economies in data structure 
manipulation may be achieved (e.g., moving an entire branch of the 
tree) . 

Sb lu2 %OTHER ^FEATURES 

5bl li.2,1 ^Invisibles 

Sbla When editing, invisibles such as spaces and tabs can be 
displayed by marks, and thus can be deleted. 

5b2 lw2,2 %Labels 

5b2a Labels are statement names and are used for retrieval 
purposes by jumps, links, and keywords. They are inserted as 
part of the text, that is, with an insert command. A label is 
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simply a variable-length character string that appears «at %the 
^beginning %o£ %a ^statement %in %parentheses. These labels 
can be changed or deleted as if they were regular text, 

Sb2b Duplicate labels can be created. A jump to a label 
results in a dump to the first occurrence of that label, since 
the system sequentially scans the name-hash field of the ring 
elements. A feature contemplated for incorporation in the 
system is a "look for next occurrence of this label" dump to 
resolve duplicate labels. 

5b3 a. 2. 3 %Links 

5b3a A link is an association to another statement, i.e., it 
is a jump to another statement that can be taken at the option 
of the user. The link can be in the current file or in another 
file. There are four parameters to a links three (the user 
name, filename, and label) define the point linked to. The 
fourth is the view specifications on the text linked to. This 
is an interesting feature: that view specifications can be 
changed on all links, 

Sb3b The link structure is a regular text string inserted in 
the text as if part of it, and is in parentheses in a syntactic 
form. Like labels, the link is just regular text until it is 
used. It can be edited at any time. When the user decides to 
take a link, he hits a character with the bug. The system 
scans forward with the content-analyzer until it picks up the 
nearest link structure in that statement, and jumps to the 
label. The link is taken by use of a jump command. 

Sbk lu2.ii. %Intrafile ^Return %Ring 

5blu Whenever any jump is made within the file, a new entry is 
made in a list called the intrafile ring. Bach of these 
entries gives a display start and a set of vlewspecs. la 
pointer indicates the current view on the list. Each time a 
jump is executed, the new information is written ahead of the 
pointer and the pointer is moved forward, on a jump return or 
jump ahead, the pointer is simply moved backward or forward 
and no new entries are made or any deleted. The list holds a 
maximum of six entries, and is circular. 

5b5 a.2.5 Interfile Return Stack 

SbSa This works much like the intrafile stack except that it 
is concerned with jumps between files. The differences with 
the intrafile stack ares (1) the length of the list is 
variable, and depends on the amount of information in the links 
used, (2) the list is not circular, a new entry is made on 
the stack whenever any interfile jump is taken or whenever a 
new file is loaded with a load file command. (See section on 
multifiies for more details.) 
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5b5b There are no backpointers from a link, the same as with 
trail markers. Thus if a label that is linked to is deleted, 
there is no user notification that a link has been made 
inoperable. Also, since link structures are entered as simple 
text, the label in a link structure does not necessarily exist. 
A link or jump to a non-existent label results in an error 
condition. 

5b6 k.2.6 Wump 

5b6a The jump command brings the desired statement to the top 
of the display. 

5b6b There are four basic types of jumps* (1) jumps to a 
specified label name, (2) jumps to links, (3) jumps through 
the tree structure, and U) jumps among different files, 

5b6bl In case l, the label or statement name to be jumped 
to can be specified by either a word-selection via the mouse 
or a literal entry from the keyboard. 

5b6b2 In case 2, the statement defined by the specified 
link is placed at the top of the display. More detail is 
given in section ti.2.3. 

5b6b3 The case 3 commands allow jumps to the next 
substatement, the next successor, the statement of which 
the selected statement Is a substatement, the previous 
statement, the head of the file, the end of the file, the 
end of branches, and many other links on the basis of tree 
and file structure. For more details see the "NLS user's 
Guide," 

Sb6bli The case % commands allow the user to load a number 
of files into the system and to jump freely among them. 
These will be discussed in Section k.2,9, 

5b6b5 There is one other type of jump, the 
jump-ahead/return. Whenever any type of jump within the 
current file is executed, the system keeps track of it, and 
a ring is maintained keeping a sequential track of all views 
that have been used. These commands allow the user to 
return to a previous view or to move forward after a jump 
return to the latest view. (See Section k.2.3 on links for 
a description of this intraflle ring.) 

5b6b6 A special feature of jumps is that almost all jumps 
allow the user to change the view specifications of the area 
jumped to from those of the current text. In addition, each 
jump saves the viewspecs of the area jumped from in the 
Intraflle ring, so that on a jump return the text is viewed 
as before. 
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5b7 k.2.7 ^Pointers 

Sb7a Pointers make It possible to select entities that are not 

on the display. The entity has a pointer fixed on it while it 
is on the screen of not more than three characters. To select 

the entity at any time, a mouse button is depressed and the 

name of the pointer is entered from the Keyboard. This is 

exactly equivalent to making a direct bug selection of the 
character that has the pointer on it, 

Sb7b The list of pointers can be displayed and one may use it 
to jump to the individual pointers. 

5b8 iu2.8 $View ^Specifications 

5b8a The view specifications (viewspecs) are parameters that 
control the way in which statements are displayed. The 
parameters are: indenting on/off; names on/offj display file 
as tree/normal text? keyword reordering on/off s display of 
statement signatures on/off; branch-only on/off; content 
analyzer on/offj trail feature on/offj pointer display 
on/offj number of lines displayed) number of levels of 
statements displayed and a few others. These canbe set in 
three ways: with the view set command, from the special 
keyset, or during certain commands such as jump. 

5b6b These parameters are always displayed in the upper left 

corner of the screen with a single letter denoting each, when 

they are capable of being changed by the user, they are 
displayed with larger letters. 

5b8c There is a relative level control, which allows changes 
to the level parameter set by the user to be interpreted 
relative to the level of the first statement in the display. 
The user can also change other viewing parameters. These 
include the type of mark the cursor leaves, the number of 
characters in a line of text, the number of spaces indented for 
each level, the number of lines in the text area, the spacing 
between lines, size of characters, etc, 

5b9 k.2,9 %Multi-%£iles 

5b9a When a file is loaded or jumped to, it is "opened" and 
displayed j no copy is created, rather the file is viewed 
directly from the disk. For reasons of file protection, if any 
changes are made, it becomes impossible to continue direct 
viewing, so the system creates a working copy when an edit is 
made. In fact, this working copy is not created until all core 
is filled and not necessarily on the first edit. In this way 
the system does not make a working copy until it definitely has 
to. When the system creates the working copy it copies the 
displayed file to it, closes the displayed file, and from then 
on all work is done in the working copy. No working copy is 
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created when the user is .just browing. Olthis browsing. This 
is done since most users just look at files and do no editing. 

5b9b Files are loaded by the load command or by an interfile 
jump command. Entries are made in the interfile stack as files 
are loaded (see lsection lw 2, 5), The working copy and the 
checkpoint file are never entered in the stack. 

5b9c One feature of the multi-files is that the user can 
create a checkpoint file at any time. This writes the present 
working copy out on the drum under the name checkpoint, 

5b9d The interfile stack can be used like the intrafile stack 
to go back and forth among views on different files, only one 
working copy at a time can be created, and can be looked at any 
time, even if a file other than the one of which a working copy 
was made has been currently loaded. 

5bl0 lu2,10 ^Freeze 

SblOa The freeze feature freezes a single statement with the 
preesent view. The frozen statement will appear at the top of 
the screen whenever frozen statements are being shown, with the 
main text display on the under part of the screen. A fixed 
number of statements can be frozen, and are displayed in the 
freeze area in the chronological order frozen. 

Sbll li.2.11 %Tree-%Display ^Feature 

Sblla This allows the user to see the file as a tree 
structure, or in the hierarchy form, instead of normal text. 
The tree structure shows the relationships of statements in the 
file to each other. This is done by indenting the differing 
levels of the tree to different depths, much like an outline 
form. This can be turned on or off by the view specifications, 

5bl2 k.2.12 ^statement ^Numbering 

5bl2a The system numbers each statement Dewey Decimal fashion 
according to the tree structure. This numbering is computed at 
display time. The numbering can be turned off by the view 
specifications. 

5bl3 li.2.13 %Vectors 

Sbl3a The vector package allows the user to create simple line 
drawings, with labels for jumps. The vector is drawn by 
specifying the endpoints with the mouse. Either endpoint of a 
line can be translated, and the entire drawing and any label 
can be translated. These vector labels can be used as jumps to 
that statement name, 

6 5, %FUTURE ^FEATURES 
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6a 5.1 »MULTIWINDOWS 

6al This may have been inspired by our raultiwindows. Theirs, 
however, is fancier in conception. This would allow any size and 
shape windows to be defined, and each window to be a self- 
contained viewing area with all the parameters as described for 
the single screen display. Their multiwindow facility could also 
assign different windows to ifferent users. This assignment is 
done by the time sharing system, though* the only programming 
problem is the protocol! who holds the eraser in each window. 

6b 5.2 ^VARIABLE ^SYMBOLS 

6bl This would allow the user to define a variable symbol for 
text, links, etc. The symbol would be filled in with text at 
display time, like an assembly time variable. Alternately, the 
variable symbol could simply be permanently defined at a later 

time. 

6C 5.3 %WEIEHSTRASS ^ALGORITHM 

6cl Currently the system uses a display map technique for 
detecting bug hits. A future plan is to use the Weierstrass 
Algorithm of continually subdividing the screen to find the line 
closest to the bug mark, which would be the line hit. 

6c2 The hierarchical structure allows the text to be set out in a 
tree form very easily. The question of advantage of this over 
traditional text was discussed with lengelbart, He said that the 
hierarchical statement-oriented structure was selected just as a 
starting point and empirically has proven to be more helpful to 
users in terms of visualizing the text. Ihe insisted there Is no 
premeditated reason toward this structure, nor need It be imposed 
on the user. 

6c3 The statement oriented quality limits the flexibility of 
editing somewhat. From our point of view, there is no editing 
across statement boundaries, for instance. Jeff said that this 
limitation is of no real imoortance since as users gain 
familiarity with the statement oriented system, they learn to make 
statements complete thoughts, and so editing across statement 
boundaries is not really necessary; the limitation is only on 
traditional thinking with traditional text. This is the same 
reason Engelbart stated for using hierarchy: the user quickly 
adapts to the structure provided him. 

6cli One advantage of the statement oriented structure is that to 
move a branch or a statement requires no actual movement of text, 
but just the changing of a few pointer. 

6c5 There is great effort not to let the user hurt himself when 
he cannot see the entire tree structure due to filters. For 
example, a user cannot delete an entire statement. There might be 
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subatatements below that are filtered out that he might 
inadvertently delete: he must five a delete-branch command and 
delete the entire branch. 
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Description of Data Areas of NLS 

1 Data forms ana terms 

la (A-string) An A-string is an array of words which contains an 
ASCII character string in the following format: The first word 
contains an integer that is the maximum number of characters that the 
string can contain. The second word is an integer that is the 
current length of the string. The string starts in the next word and 
is packed three characters per word. A null string is indicated by a 
current length of -1, a one character string by zero, etc. A-strings 
are usually handled via routines APCHR, APSR, 1DCHR and others in the 
UTILTY overlay, 

lb (General Stack) The general stack (array STACKD) is used by the 
SPL routines for return locations and arguments, and by the Content 
Analyzer pops in SDBMNP. The stack pointer is STACK, which points to 
the current top word (being used) in the stack. 

lc (PSID) PSID stands for Permament Statement iDentifier. It is a 
11 bit integer between zero and 20&7 which NLS uses as identification 
for a statement. It remains unchanged as long as that statement is 
in the file. That is, the PSID for a statement is not changed, even 
though the text may be completely replaced or the statement moved in 
the file structure. When the statement is deleted, that same PSID 
may later be used to identify a different statement. 

Id (RING element) A PSID refers to a statement. Every statement 
has a RING element, and the PSID can be used to find the ring 
element. The RING element contains various fields, and these are 
usually read via the GIT routines in the UTILTY overlay. A RING 
element is a four word block that contains the following i 

ldl First word: The last five octal digits (IS bits) contain a 
PSDB, The first three octal digits contain flags which mean: 

Idla Bit 0: statement Name is present or not 

ldlb Bit 1: This statement has been tested against current 
pattern 

Idle Bit 2: on if this statement passed the pattern test 

ldld others: unused at present 

ld2 Second word: bits to 10 contain the PSID of the SUB 
statement. If there are no SUB statements, the PSID of this 
statement is in this field. Bits 13 to 23 contain the PSID of the 
sue (successor) for this statement. Bit 11 is on if this statement 
is a HEAD (first in a plex). Bit 12 is on if this statement is a 
TAIL (last in plex). If it is a TAIL, the SUC is the PSID of the 
SOURCE statement, and there is no successor. 



Description of Data Areas of NLS 

id 3 Third words The hash code for the name is here, it is zero if 
there is no name. 

Id* Fourth words This contains the pvdb if there is a vector 
picture with this statement, otherwise it is zero. 

le (work area) Several routines require work areas as calling 
arguments. A work area is simply an array of cells in a read-write 
page. The address of the work area is usually provided in the x, and 
occationally the work area needs to be initialized in a certain way. 

If (SDB) An SDB is a STatement data block, a variable length block 
of words in a random file text block (type 1), SDB's have a seven 
word header that indicates! 

lfl (1) length of stb (2) psid (3) date U) time (5) initials 
(6) number of characters (7) characters in name 

lg (VDB) A VDB is a vector data block, a variable length block of 
words in a random file vector block (type 2), VDB's have an eight 
word header that indicates; 

lgl (1) length (2) psid (3) date U) time (5) initials (6) # 
of lines (7) height (8) spacing 

lg2 Height is given in raster units 

lg3 The last word contains the spacing flag which is set if space 
is to be left for the drawing when the display is created 

lh (PSDB) A PSDB is a 15 bit pointer to a statement data block (SDB). 
The PSDB in a ring element indicates where the text for that 
statement is. 

li (block type) Every random file block has a type number in it. The 
type number indicates that the block is: 

lil (0) Not legal 

112 (1) A text block (a block containing SDB's) 

113 (2) A vector block of VDB's 
li* (3) A ring block 

US (*) The query block 

lj (block number) The random file blocks are numbered sequencially. 
Block zero is the header block. The block number is an index into 
the random file block status table. 
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Ik (block status table) Their are two levels of status blocks for 
providing information about the random file blocks. The random file 
block status table (RFBS) indicates whether each block is in core or 
not, and if not, how many words are free in that block. For each 
type of block, there is a block status table with one entry for each 
block of that type. An entry indicates which random file block status 
entry corresponds to that block. 

11 (overlay) An NLS overlay is a one page (2K) block of code, usualy 
reentrant. overlays are usually not read from an 10 device when 
needed, but are "around" and ready to run when NLS is started. 
Excatly whether the overlay is in core or not is up to the time 
sharing system, 

lm (relabeling) 

In (overlay number) 

lo (address) 

lp (overlay address) 

lq (interrupt) 

lr (hash code) 

Is (buffer) 

It (freezing) 

lu (thawing) 

lv (literal) 

lw (statement vector) 

Ix (statement number) 

ly (T-pointer) 

lz (T-string) 

la§ (state) 

laa (subroutine) 

lab (argument) 

lac (pointer) 

lad (register) 



